LastRowID wie auslesen?

[p80286]

[QUOTE=AlexII;1269947]
    Form1.SQLQuery1.ParamByName('fk_category_id').AsInteger := Integer(CategoryComboBox.Items.Objects[CategoryComboBox.ItemIndex]) Das halte ich nicht für optimal. Die möglichen Werte für

Code:

fk_category_id

sollten aus der DB kommen und nicht aus Deinem Programm. Das kann gut gehen, dafür muß aber sicher gestellt werden, daß

Code:

fk_category_id

und Integer(CategoryComboBox.Items.Objects[CategoryComboBox.ItemIndex]) immer gleich sind (für gleiche zugehörige Inhalte).

Null-Werte würde ich nicht über Parameter, sondern explizit übergeben:

Code:

 'INSERT INTO tbcategory VALUES(NULL, NULL)'

Gruß
K-H

[AlexII]

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.

[mkinzler]

Zitat:

Null-Werte würde ich nicht über Parameter, sondern explizit übergeben

Oder gleich weglassen
Statt
INSERT INTO tabelle VALUES( NULL, :Wert); INSERT INTO tabelle Wert VALUES(:Wert);

[DeddyH]

Dann musst Du aber auch die Felder angeben:
INSERT INTO tabelle(Feld1, Feld2) VALUES(:Wert1, :Wert2);