Thema: Delphi ADO Exception

Einzelnen Beitrag anzeigen

Brainshock

Registriert seit: 26. Nov 2004
Ort: 37345
214 Beiträge
 
Delphi 7 Professional
 
#5

Re: ADO Exception

  Alt 3. Sep 2009, 10:08
Hi,

ist der normale Fehlertext nicht aussagekräftig genug, dass du das nochmal extra abfängst?
Was kommt denn für eine Exceptionklasse zurück? Vielleicht die auswerten bzw. die Message der Exception.

Delphi-Quellcode:
      
try
  Query1.Close;
  Query1.SQL.Clear;
  Query1.SQL.Add('select * from TABLE');
  Query1.Open;
  Query1.Append;
  Query1.FieldByName('nr').AsInteger := nr;
  Query1.Post;
except
  on E: Exception do
    MessageDlg(E.Classname + ' ' + E.Message , mtError, [mbOK], 0);
  Query1.Cancel;
end;
Gruß
Matthias
Matthias
  Mit Zitat antworten Zitat