Weiß zwar nicht, was Du vorhast, eventuell sowas?
Delphi-Quellcode:
var
sl : TStringList;
begin
sl := TStringList.Create;
ADOQuery.Close;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Add('SELECT username FROM users') ;
ADOQuery.Open;
while not ADOQuery.EoF Do begin
sl.Add(ADOQuery.Fields[0].AsString);
ADOQuery.Next;
end;
ADOQuery.Close;
// Irgendwas mit der Stringliste machen.
...
sl.Free;
end;
Statt 'ner Stringliste könnte man dort auch von 'ner TComboBox die Eigenschaft Items nehmen. Dann sieht die entsprechende Zeile so aus:
ComboBox1.Items.Add(ADOQuery.Fields[0].AsString);
An Stelle von
sl := TStringList.Create;
wäre dann eher ein
ComboBox1.Items.Clear;
angebracht.