try-except - HandleException-Befehl

[Muetze1]

Zitat von simlei:

Hmm. das mit dem nil hat nmicht geklappt... Und wenn das ein Pseudocode ist, wie kann ich mein Ziel nun erreichen?

Behandle an der Stelle die Exceptions! Was fehlt dir denn nun noch? Schmeiss dort die ShowMessage aus oder vllt. auch noch den Klassennamen und Meldungstext der Exception - aber was nun noch? Was ist dir unklar? Was fehlt dir?

Möglichkeit 1:

Delphi-Quellcode:

Try
  ...
Except
  On E: Exception Do
    ShowMessage(Format('Exception %s aufgetreten: %s', [E.ClassName, E.Message]));
End;

Möglichkeit 2:

Delphi-Quellcode:

Try
  ...
Except
  ShowMessage(Format('Exception %s aufgetreten: %s', [Exception(ExceptObject).ClassName, Exception(ExceptObject).Message]));
End;