hola!
si lo he entendido bien podrias hacer lo siguiente:
Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
try
{instrucciones del programa}
except
//Aquí me gustaría mostrar el mensaje de error generado por otra clase
On E: Exception do
begin
//Aquí tratarias el error si es necesario
ShowMessage(E.Message); //muestras tu error
end;
end;
end;
bueno eso es todo, sabiendo lo poco que nos has contado, si necesitas más aquí estamos!!