[__cadetill]

No se si es lo que preguntas, pero si haces.....

Código Delphi [-]
try
  .....
except
  on E: Exception do
    ShowMessage(E.ClassName);
  end;

En E.ClassName y E.ClassType tienes el nombre y el tipo de la excepción lanzada