Jah... da muss man sehr aufpassen, aber ich habe alles soweit logisch durchgespielt, es muss gehen. So lade ich die ComboBoxen:
Delphi-Quellcode:
// Kategorie laden
Form2.CategoryComboBox.Clear;
Form2.CategoryComboBox.Items.AddObject(' ', TObject(0));
SQLQuery1.Close;
SQLQuery1.SQL.Text := 'SELECT id_tbcategory, category FROM tbcategory';
SQLQuery1.Open;
while not SQLQuery1.Eof do
begin
Form2.CategoryComboBox.Items.AddObject(SQLQuery1.FieldByName('category').AsString, TObject(SQLQuery1.FieldByName('id_tbcategory').AsInteger));
SQLQuery1.Next;
end;
Auch wenn in der ComboBox was gelöscht wird, kommen die IDs nicht durcheinander.