Hallo,

steige gerade von BDE auf ADO um. Habe dazu Query durch ADOQuery ersetzt. Läuft auch alles. Nur wie fange ich jetzt (mit ADO) die Fehler z.B. doppelter Schlüssel ab? Der u.g. Mechanismus beruhte auf BDE.

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: EDBEngineError do
if E.Errors[0].ErrorCode = 9729 then Begin
MessageDlg('Fehler bei Insert (duplicate key)! ' + IntToStr(e.errors[0].errorcode) , mtError, [mbOK], 0);
Query1.Cancel;
end
else
MessageDlg('Fehler bei Insert! ' + IntToStr(e.errors[0].errorcode) , mtError, [mbOK], 0);
end;

jangbu