cargar lista en un combobox o tdblooupcombobox
 

buenas... quiero hacerles una consulta: estoy trabajando en delphi 7 y tengo una tabla en access de una agenda:
categorias
IDCATEGORIA DESCRIPCION
1 familiares
2 amigos
3 companeros del trabajo

y quiero cargar en un combobox la lista de "descripcion"(familiares,amigos,compañeros de trabajo) para despues poder seleccionar cualquiera y grabarlo en mi otra tabla en el campo de categoria.
contactos
idcontacto categoria nombre apellido direccion telefono

como puedo lograr eso??
espero puedan ayudarme.
desde ya muchas gracias.
saludos.
Gonzalo.

Hola

Código Delphi [-]
ADOQuery1.SQL.Text := 'Select Descripcion From Categorias';
   ADOQuery1.Active := True;
   While not ADOQuery1.Eof do
   begin
      Combobox1.Items.Add(ADOQuery1.Fields[0].Text);
      ADOQuery1.Next;
   end;
   ADOQuery1.Active := False;

Saludos

muchas gracias!!!
 

te agradezco me funciono a la perfeccion!!

saludos.

gonzalo.

siguiendo el hilo
 

ahora tengo otro problema no me graba nada despues que selecciono del combobox, escribo el codigo que estoy usando, pero antes describo cuales son los componentes que estoy usando. tengo un ttable(tblcontactos) conectado al datasource(dscontactos) y a la dbgrill, y tambien tengo un tquery(qcontactos) todo esto dentro de un datamodule(dmcontactos). el codigo es:

dmcontactos.tblcontactoscategoria.asstring:= combobox1.text; (yo creo que es asi) y luego al final.
dmcontactos.tblcontactos.post;

el tema es que esta tabla como se ve en el primer mensaje que mande es tabla secundaria y teoricamente deberia por lo menos aparecer por ejemplo 1 que seria igual a familiares(en la tabla primaria) y no se ve nada en la grilla. sera que tengo que asignar a la lista del combobox que por ejemplo familiares es IDCATEGORIA=1?? pero entonces creo que deberia usar tambien un poco las sentencias SQL no??? por que hay relaciones de tabla. con el resto de los campos no tengo probñemas se graban bien.

bueno espero que me puedan ayudar.

desde ya les agradezco.

saludos.

Atte, Chalo.