Einzelnen Beitrag anzeigen

The_Doomed

Registriert seit: 5. Dez 2007
101 Beiträge
 
#1

exception bei locate procedure

  Alt 7. Mai 2008, 17:41
Datenbank: MyBase • Zugriff über: dataset, datasource
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

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
Zeit totschlagen entehrt den Menschen, schaffen in ihr was bleibt,
erst das heißt gelebt haben wie ein Mensch.
Hans Joachim Ploß

MFG The_Doomed
  Mit Zitat antworten Zitat