Zitat von
Archer:
Hallo!
Bei der Ausführung bekomme ich dann die Fehlermeldung:
ADOTable1 not in Edit Mode.
Hat da jemand mal einen Tip für mich??
Danke!
Jochen
Moin, moin,
Du wilst gleichzeitig editieren, löschen und speichern, siehe unten.
Dein Debugger dürfte in der Zeile mit dem "Post" stehengeblieben sein.
Ich würde immer ein
SQL- Statement al la delete from tabelle where bedingung vorziehen.
Gruß
Malte
Delphi-Quellcode:
procedure TForm11.Button2Click(Sender: TObject);
begin
adotable1.Close;
adotable1.Open;
// adotable1.edit;
adotable1.RecNo:=recordX;
adotable1.Delete;
// adotable1.Post;
adotable1.Close;
adotable1.Open;
label13.Caption:=inttostr(Adotable1.RecordCount);
end;