Код:
procedure TForm1.ExceptionEvent(Sender: TObject; E: Exception);
begin
// ShowMessage(E.Message);
end;
И как мне из этой процедуры завершить ту, которая в процессе выполнения?
Вы извините меня, я не очень шарю. Мануалы не всегда помогают. В этом, например, случае. Поэтому и спрашиваю.