TTeeExceptionForm.Button1Click
TTeeExceptionForm
procedure
Button1Click(Sender: TObject);
Unit
TeeException