Hola
No veo ningun error, solo que no se necesita desconectar el adoquery:
Código Delphi
[-]
ADOQuery1.SQL.Text := 'Select Campo from Tabla1';
ADOQuery1.Active := True;
While not ADOQuery1.Eof do
begin
Combobox1.Items.Add(ADOQuery1.Fields[0].Text);
ADOQuery1.Next;
end;
AdoQuery1.Active := False;
Saludos