Como usar el ApplicationEvents ?

[Descendents]

En el evento on exception del componente le pones el código

Te tiene que quedar mas o menos asi:

procedure TForm1.ApplicationEvents1Exception(Sender: TObject;
E: Exception);
begin
showmessage('Error en el sistema');
end;

Un saludo