ComboBoxen Einträgen Daten zuweisen

[Jack23]

Hallo

ich mal wieder.

Muss ich wirklich für jede Frage ein eigenes Thema öffnen? Auch wenn es mit dem anderen zu tun hat?

Naja wenn es sein muss.

Also ich habe die Daten jetzt in drei ComboBoxen. Mit folgenden Code:

Delphi-Quellcode:

procedure TForm1.CB(Sender: TObject);
begin
ComboBox.Items.Clear;
ADOQuery.First;
while not ADOQuery.EOF do
  begin
    ComboBox.Items.Add(ADOQuery.FieldByName('Test').AsString);
    ADOQuery.Next;
  end;
end;

Das klappt auch wunder bar.

Wie gesagt habe ich jetzt drei Boxen können aber noch mehr werden.

Nun möchte das jedem Box Eintrag ein Wert zugewiesen wird.

Beispiel:

name|wert
Test1|2 B B, 54 Häuser mit Fenstern, 80 CD Rohlinge, 66M Kabel
Test2|....

Dabei sind die Werte durch ein Komma getrennt. Ich möchte wie gesagt später mal mit den Werten rechnen.

Wie bekomme ich das in der ComboBox zugewiesen?

Das der Name2 der ComboBox den wert1 hat u.s.w.

Damit ich später damit gut rechnen kann.