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