combobox y ado
 

hola, como incluyo dentro de la lista de los combobox los resultados de un adoquery o adotable, lo he intentado con varias probiedades pero solo me da el primer resultado cuando los quiero todos...
gracias por adelantado,

Mira, lo que tienes que hacer es un ciclo que te llene el ComboBox, en el Evento OnEnter del ComboBox pones lo siguiente:

Código Delphi [-]
  procedure TForm1.ComboBox1Enter(Sender: TObject);
  var
  Art_list:string; //Art_List es la variable que te cojera el valor de la tabla
  //y se lo pasara al combobox
  Ultimo:Integer;
  i:integer;
  begin
     With ADOQuery1 DO
     Begin
     Close;
     SQL.Clear;
     SQL.Add('Select (Count(Distinct(Campo))) From TuTabla;')
     Open;
     //La Variable Ultimo es tipo integer, y te servira para finalizar el ciclo
     Ultimo:=Fields[0].AsInteger;
   ADOQuery1.Close;
     
   ADOQuery1.SQL.Clear;
   ADOQuery1.SQL.Add('Select Distinct(Campo) From TuTabla ORDER BY Campo')
   ADOQuery1.Open;
 ADOQuery1.First;
   FOR i:=1 To Ultimo DO
     Begin
     Art_List:=ADOQuery1.Fields[0].AsString;
ComboBox1.Items.Add(Art_List);
   ADOQuery1.Next;
     end;
     end;
     end;
  end;

Combobox y ADO
 

Hola

No se si has probado con el DBLookCombobox, pero si estas obligado a utilizar un ComboBox solo tienes que ejecutar la Query y luego:

CuentasClientes.First;
while not CuentasClientes.Eof do
begin
CBCuentas.Items.Add(CuentasClientescuenta.Value);
CuentasClientes.Next;
end;
end;

Saludos
Luis Garcia

______________________________
Ahorrar despedidas es ahorrar llanto

hola que tal

lgarcia me si no es mucha molestia me peudes decir a que te refieres con:

CuentasClientes

CBCuentas

CuentasClientescuenta.Value


gracias

saludos

Supongo que:
Saludos...