Fehlermeldung auslesen

[Mauli]

Hallo zusammen.

Hat jemand eine Idee, wie ich den Text einer Fehlermeldung auslesen kann.

Es soll wenn in einem Programm eine Fehlermeldung erscheint der Text ausgelesen werden und da es meist ähnliche Meldungen sind wie z.B. "Tabelle ist in gebrauch von User xyz" soll das Programm dann bestimmte Sachen machen.

Dafür benötige ich aber den Text.

Kann mir jemand helfen?

Danke

[sakura]

Es geht am einfachsten, wenn Du die Fehler in einem try...except Block abfängst.

Delphi-Quellcode:

try
  ....
  .... 
  .... FEHLER
  ....
  ....
except
  on E: EDivByZero do
  begin
    // division durch 0
    ....
  end;
  on E: EIntOverflow do
  begin
    // wert zu groß für integer-variable
    ....
  end;
  on E: EInvalidPointer do
  begin
    // access violation
    ....
  end;
  on E: Exception
  begin
    // alle anderen Fehler
    ....
  end;
end;

Die Nachricht kann jeweils mit E.Message (Sprachabhängig!!!) ausgelesen werden. Andere Fehlertypen sind definiert OH.

......

[Mauli]

Vielen Dank schon einmal. Ich probiere das direkt aus.

[Luckie]

Und wenn du die Fehlermeldung vom letzten Fehler in deinem Programm brauchst der vom System kam: RaiseLastOSError();.

[Chewie]

Kann es sein, dass diese Funktion unter D5 RaiseLastWin32Errorr() heißt?

[Luckie]

Jupp, das tut sie.

[Chewie]

Und derjenige, der die Frage gestellt hat, hat D5

[Mauli]

Trotzdem vielen Danke an alle.

[Luckie]

Zitat von Chewie:

Und derjenige, der die Frage gestellt hat, hat D5

Beim Posten habe ich mich tatsächlich gefragt, was er für eien Delphi-version ah, aber ich war dann zu faul noch mal nachzukucken, sonst hätte ich gleich die passende Funktion gepostet.