ComboBox mit Daten einer SQL-Abfrage füllen

[Jens Schumann]

Hallo,
wie wäre es damit:

Delphi-Quellcode:

With Query1 do begin 
     Active := False; 
     SQL.Add('Select Aus_Name As Name, Aus_Datum As Datum'); 
     SQL.Add('From Tabelle1'); 
     SQL.Add('Where Aus_Name = "Max"'); 
     SQL.Add('Group By Aus_Name, Aus_Datum'); 
     Open; 
     While Not EOF do
       begin
       ComboBox1.Items.Add(FieldByName('Datum').As String); //Hier liegt das Problem 
       Next;
       end; 
     Active := False; 
end;