Try Except - Originale Delphi Fehlermeldung?

[Magnus]

Hallo,

wie kann ich bei einer Try-Except Anweisung den Text der originalen Delphi Fehlermeldung abfangen?

Delphi-Quellcode:

TRY
 { irgendwelcher fehlerverursachender Code }
EXCEPT
 showmessage('Huch, ein Fehler');
END;

Die Fehlermeldung möchte ich um den originalen Fehlertext von Delphi erweitern, da ich nur dann weiß, was eigentlich passiert ist. Denn wenn ich den Code einfach ohne TRY laufen würde, würde Delphi ja eine schöne detaillierte Information ausgeben.