exception bei locate procedure

**The_Doomed**

also ich bekomm bei folgendem quellcode
bei dem eine Datenbank auf doppelte einträge überprüft wird
eine exception der klasse EDatabaseError
wo steht dass meine datenmenge weder im Editier noch Einfügemodus ist

zusammenfalten · markieren

Delphi-Quellcode:

			procedure Taddform.addbtnClick(Sender: TObject);

begin

comname.Text:=n;

 if database.DBGrid1.DataSource.DataSet.Locate('ausgabename', n,[]) then

 begin

 Fehlermeldung.showmodal;

 end

else

begin

database.DBGrid1.DataSource.Dataset.Append;

database.DBGrid1.DataSource.Dataset.FieldByName('ausgabename').Value := addform.comname.text;

database.DBGrid1.DataSource.Dataset.Post;

close;

end;

hab aber keine idee warum
selbst wenn ich den Prüfalgo rausnehme bringt er die exc. obwohl es vorher einwandfrei ging

exception bei locate procedure

exception bei locate procedure

Forumregeln