[aqula]

На какую форму? у меня Connection в DataModule
Если на главную, то этот код не отлавливает при разрыве соединения

Код:

procedure TPhoneBook.ApplicationEvents1Exception(Sender: TObject;
  E: Exception);
begin
 RichEdit1.Lines.Add('Event OnException: ' + E.Message);
end;

end.