Fai qualche prova...


non c'e' stato niente da provare!!!

ha funzionato perfettamente subito!

ho inserito l'oggetto da te suggerito sul mio FrmMain e nell'evento OnException

codice:
procedure TFrmMenu.ApplicationEvents1Exception(Sender: TObject;
  E: Exception);
begin
 ShowMessage(E.ClassName+' errore genetato, messaggio: '+E.Message);
end;
e cosi visualizzo il mio messaggio ad ogni eccezzione.

grazie!!!!

ciao