Inhalte eines Fields in eine ComboBox Laden

[Juergen2020]

Leider bin ich damit noch erfolglos. Die Box öffnet sich keinen Millimeter:

Code:

procedure TForm1.DBLookupComboBox2DropDown(Sender: TObject);
begin with ADOQuery8 do
        begin SQL.Text := 'Select ID, Wert from Sammler where (Thema = ''AG'');';
              Open;
              with DBLookupComboBox2 do
                begin ListField := 'Wert';
                      KeyField := 'ID';
                      ListSource := DataSource8;
                end;
        end;
end;

Ich wüßte jetzt auch nicht wirklich, wie ich die Box dann befülle im "Offline-Modus" Es werden die vollen Querys gespeichert und bei Offline-Modus geladen, aber offline kann ich ja kein SQL benutzen ?