Problemas con el codigo SQL

[[Caral]]

Hola
o:

Código Delphi [-]
with IBQuery2 do
  begin
    Close;
    SQL.Text:= 'SELECT DISTINCT LOCALIDAD FROM CIUDADES ORDER BY LOCALIDAD';
    Open;
    ComboBox1.Clear;  // <-
    while not Eof do
    begin
      ComboBox1.Items.Add(FieldByName('LOCALIDAD').AsString);
      Next
    end;
    Close
  end;

Me niego a creer que entre un Maestro y este novato no podamos solucionarlo......
Saludos