Perdón Vales, me confundí al copiar/pegar código.
Debería ser:
Código Delphi
[-]
procedure TForm1.btnCargarClick(Sender: TObject);
begin
with IBQuery2 do
begin
Close;
SQL.Text:= 'SELECT LOCALIDAD FROM CIUDADES ORDER BY LOCALIDAD';
Open;
while not Eof do
begin
ComboBox1.Items.Add(FieldByName('LOCALIDAD').AsString);
Next
end;
Close
end;
end;
Saludos.