Exceptions behandeln... Ich glaun ich bin zu plöd....

[Muetze1]

Moin!

Delphi-Quellcode:

If ( E Is EOLEException ) Then
  EOLEException(E).Eigenschaft  // bzw. ( E As EOLEException ).Eigenchaft

Die Exceptions sind nix anderes als Klasseninstanzen abgeleitet von Exception (welche von TObject abgeleitet wurde). Diese sind ohne Probleme Cast-bar. Auch ist ExceptObject innerhalb eines Try/Finally und Try/Except Blockes gültig und gefüllt mit der Exception Instanz. Das On E: Exception Do macht nix anderes als eine Klassenabfrage und einen TypeCast mit ExceptObject zu machen.

MfG
Muetze1