Zitat von
Jelly:
Zitat von
RX3:
Delphi-Quellcode:
procedure TForm1.ButtonAddClick(Sender: TObject);
begin
checklistbox1.Items.Add(table1.fieldbyname('Genre').AsString);
table1.Insert;
end;
Durch ein Table1.Inser versetzt du die Tabelle lediglich in den Insert Modus. Um den Datensatz auch wirklich hinzuzufügen, fehlt noch ein anschliessendes Post. Dazwischen werden die Datenbankfelder gefüllt. Beendest du jetzt dein Programm, wenn die Tabelle noch im Insert Modus ist, ist der Datensatz verloren.
damit ist das Indexproblem aber noch nicht gelöst!!