Von ADOQuery to EditFeld

[t0mmy]

Okay ich erklärs mal ganz einfach

Ich hab eine DBGrid in der liste ich aus Tabelle1 bestimmte zeilen auf
Diese Zeilen haben 3 spalten.

Die 2. und 3. Spalte möchte ich pro Zeile variabel machen Sprich diese mit 2 Comboboxen und einem Button wo das Update drinnen steht variabel machen (änderbar)

Die Tabelle is folgendermaßen aufgebaut.
Spalte1 = nvarchar
Spalte2 = smallint
Spalte3 = bit

Ich möchte die letzten zwei Spalten mit Comboboxn ändern können jedoch stehen in meinen Comboboxn Strings und da ist schon das Problem. da ich einmal smallint habe und bit
Jetzt bekomm ich natürlich einen Datentyp problem denn ich kann kein Wort in ein smallint reinschreiben... da dort die Nummern drinnen stehen. Diese nummern stehen mit der Bezeichnung in einer anderen Tabelle.

[DeddyH]

Du könntest die Objects-Eigenschaft von TStrings (also auch TComboBox.Items) missbrauchen, um dort den Primärschlüssel der Lookup-Tabelle abzulegen. Das müsste etwa so funktionieren:

Delphi-Quellcode:

DeineComboBox.Items.BeginUpdate;
try
  DeineComboBox.Items.Clear;
  Query.SQL.Text := 'SELECT ID, Bezeichnung FROM Tabelle2 ORDER By Bezeichnung';
  Query.Open;
  while not Query.EOF do
    begin
      DeineComboBox.Items.AddObject(Query.FieldByName('Bezeichnung').AsString, TObject(Query.FieldByName('ID').AsInteger));
      Query.Next;
    end;
finally
  DeineComboBox.Items.EndUpdate;
end;

Um nun and die hinterlegte ID zu gelangen, castest Du eben wieder zurück.

Delphi-Quellcode:

ID := integer(DeineComboBox.Items.Objects[DeineComboBox.ItemIndex]);

[mkinzler]

Zitat:

Zitat von DeddyH (Beitrag 1146154)

Ich habe das jetzt 4 mal gelesen, aber immer noch nicht verstanden. Brauchst Du einen Lookup oder wie? :gruebel:

Oder einen Join