![]() |
adjuntar los registro de un campo de mi tabla en un DBcombobox
buenas quiero llenar un dbcombobox con la informacion de una tabla que tengo en una base de datos hecha en access, solo me interesa que el db combobox se llena con el campo empresa, diganme como le hago, me imagino que es con una while not eof pero no so como tratarlo con bases de datos, intente pero no puede, profis necestio ayudita.
|
|
Simon Estuvre Revisando Ese Hilo, Y Creeme Que Probe Hacer Algo Semejante Y La Verdad No Se Pudo, No Puedes Ayudarme
|
Un Saludo. |
sip esta buena la solucion, pero utilizo solo un table, no un ado table e intente realizar el codigo que tu amablemente pusiste y no me funciono, dime, amigo que puedo hacer.
|
Hola
Solucion simple y sencilla. Quita el DBCombobox y pon un Combobox sencillo. No uses un Table usa un Query. Pon este codigo, puede ser en el form create o donde la necesites. A ver como te va, lo comentas. Saludos |
Porque mejor no usas un DBLookupComboBox para mostrar la empresa
Ligas las propiedades Cita:
Nota: requieres de una llave en tu tabla Salud OS |
gracias caral funciono re bien , aaaw, que buenas personas son todos ustedes, funciono re bien, muestra todas las empresas, el codigo me quedo asi:
Código procedure TForm1.Button1Click(Sender: TObject); begin Query1.Active:=false; Query1.SQL.Text:='Select empresa from Empresa'; Query1.Active:=true; while not Query1.Eof do begin combobox1.Items.Add(Query1.Fields[0].text); Query1.Next; end; obviamente al pulsarlo, me reconocera todas las empresas que tenga almacenadas en mi tabla pero se podra hacer esto solamente al abrir el form ??????? la verdad es que si se puede aprovechando el procedimiento creacion del form, aplique el mismo codigo solo agregando el codigo para limpiar el combobox, puesto que al iniciar varias veces el form, el combobox se iba llenando, a todos muchas gracias aqui les dejo el ejemplo. procedure TForm1.FormCreate(Sender: TObject); begin combobox1.Clear; Query1.Active:=false; Query1.SQL.Text:='Select empresa from Empresa'; Query1.Active:=true; while not Query1.Eof do begin combobox1.Items.Add(Query1.Fields[0].text); Query1.Next; end; end; gracias todo me funciona de maravilla |
bueno ahora la intencion de tener en el combobox las empresas es la siguiente, estas tienen un codigo, deseo poder dar clic a cualquier empresa y que me muestre el codigo, que tambien esta en la tabla, e estado pensando como, pero la verdad no se ni como empesarlo, creo que se usa el query, pero la verdad hasta hoy utilize quirys, por favor necesito ayuda, de antemano les agradezco todas sus finas atenciones hacia mi.
|
|
| La franja horaria es GMT +2. Ahora son las 01:50:35. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi