[Delphi] Exception laten zien na handling

[Darkvater]

Een beetje een vreemde titel, maar ik wil eigenlijk de exception message laten zien nadat ik die heb afgehandeld in een try...except blok. Bijvoorbeeld:

code:

try
  raise CustomException.Create('fout!');
except
  .....laat deze zien (een soort van messagedlg ofzo)...
end;

Het is natuurlijk leuk, want ik handel het af zodat de gebruiker die error niet hoeft te zien, maar ik wil het laten zien!!

[whoami]

Kijk eens in de Delphi help naar Exception handling.

code:

except 
  on E : EDatabaseError
     MessageDlg (E.Message, mtInformation, [mbOk], 0);
  end;
end;

Iets in die aard, gewoon manual werk eigenlijk hoor.