Exception-Frage (Exception auslesen)

[dGeek]

Kurz und knackig:
wenn ich eine Exception bekomme und ich sie nicht behandle, steht in 2 Zeilen geschrieben was los ist.
In der ersten Zeile steht dann z.B. "EDivByZero"

Wie kann ich EFOpenError auslesen? Meine Variable ist E vom Typ Exception.

[Luckie]

Wo steht das? Gib mal Beispielcode.

[Daniel]

Du möchtest den Typ der Exception erkennen?

Delphi-Quellcode:

try
...
 except
   // IO error
   On E : EInOutError do
     ShowMessage('IO error : '+E.Message);
   // Dibision by zero
   On E : EDivByZero do
     ShowMessage('Div by zero error : '+E.Message);
   // Catch other errors
   else
     ShowMessage('Unknown error');
 end;

[DeddyH]

Der übliche Weg ist:

Delphi-Quellcode:

try
...
except
  on EFOpenError do
    ...
  on EIrgendwas do
    ...
  else
    ...
end;

Aber eine Abfrage mit is sollte IMO auch funktionieren.

Delphi-Quellcode:

try
  ...
  except
    on E: Exception do
      if E is EFOpenError then
        ...
  end;

[Luckie]

Hier habe ich auch noch was:
http://michael-puff.de/Programmierun...ceptions.shtml
http://michael-puff.de/Programmierun...ceptions.shtml

[dGeek]

Ok interessant. Ich nehme mal an, EFOpenError gehört dann zu IO richtig?
Ich versuche mich gerade an einem Error-Handler der über das OnException-Ereignis geht aber der wird nie getriggert. Ist aber nebensächlich.

Zitat:

Zitat von Luckie (Beitrag 1348729)

Wo steht das? Gib mal Beispielcode.

Das hier meinte ich:

Zitat:

---------------------------
Anwendungsfehler
---------------------------
Exception EDivByZero in Modul Test.exe bei 0002E314.
.....

---------------------------
OK
---------------------------

Und ich dachte halt, man kann dieses EDivByZero auslesen aber scheinbar muss man für jeden Exception-Typ eine eigene Behandlung machen.

[bernau]

Zitat:

Zitat von Luckie (Beitrag 1348733)

Hier habe ich auch noch was:
http://michael-puff.de/Programmierun...ceptions.shtml
http://michael-puff.de/Programmierun...ceptions.shtml

Zwei mal der gleiche Link :?:

Auf der angegebenen Seite führen die ersten beiden Links in's Leere. :!:

[Luckie]

So jetzt sind es zwei unterschiedliche Links.

Und was die toten Links angeht, guck mal auf das Datum ganz unten auf der Seite: 2010-12-29T23:44:45 +0100. ;)

[Daniel]

Eben bei Facebook gefunden - der universelle Exception-Handler:

Delphi-Quellcode:

try
  ...
except
  on E:Exception do
  begin
    url := 'http://stackoverflow.com/search?q=' + HTTPEncode(E.Message);
    ShellExecute( 0, 'OPEN', PChar(url), '', '', SW_SHOWNORMAL );
  end;
end;

:mrgreen:

[Luckie]

LOL. :mrgreen: Wir brauchen eine Like-Funktion hier. Ich roll mich gerade weg.