[FireBird] IBQuery Datenbankfehlermeldung abfangen

mexx · Beiträge: 1183

Bei der Verwendung von TQuery-Komponenten kenne und verwende ich folgendes Verfahren, um Datenbankfehler abzufangen.

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

try
//mach was
except
 on E: EDBEngineError do
  begin
   Info(E.Message,2);
  end;
end;

Nun verwende ich TIBQuerys. Statt die Meldung E.Message an die Procedure Info zu schicken, erhalte ich die Meldung als ErrorMessage auf den Bildschirm. Wahrscheinlich ist das EDBEngineError falsch. Was muss als "MessageTyp" stehen, um Fehlermeldung von TIBQuerys abzufangen?

_________________
Das Unsympathische an den Computern ist, dass sie nur ja oder nein sagen können, aber nicht vielleicht.