В событии OnException компонента ApplicationEvents пишем всего два символа: //
Аминь.
Код: Выделить всё
procedure TForm1.ApplicationEventsException(Sender: TObject; E: Exception);
begin
//
end;
Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду
Код: Выделить всё
procedure TForm1.ApplicationEventsException(Sender: TObject; E: Exception);
begin
//
end;
Код: Выделить всё
begin
[color=navy]//
[/color]end;