Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 07-03-2007
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 21
enecumene Va por buen camino
Llenar un combobox con los campos de una tabla

hola a todos!!!

quioer hacer lo siguiente he estado buscando por el foro y no he podido encontrarlo, talvez no lo busque bien, pero bueno aqui va. quiero llenar un combobox con los campos de una tablas no los datos sino los campos, me explico:

tabla clientes:

NOMCLI
DIRCLI
TELCLI
CC

en el combobox:

Nombre->valor(NOMCLI)
Direccion->valor(DIRCLI)
y asi sucesivamente..

eso es para fines de busqueda de datos como un filtro algo asi, espero que puedan entender lo explicado mas arriba.

chao, saludos...
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
  #2  
Antiguo 07-03-2007
Avatar de poliburro
[poliburro] poliburro is offline
Miembro Premium
 
Registrado: ago 2004
Ubicación: México D.F
Posts: 3.068
Poder: 23
poliburro Va por buen camino
Ok, Puedes hacer lo siguiente, lanzar una consulta que te devuelva por lo menos una fila de la tabla, con la finalidad de obtener la definiciónd de las columnas.

Una vez hecho esto prueba con:

Código Delphi [-]

For LiContador := 0 To DataSet.FieldCount - 1 Do
  CmbCamposTabla.Items.Add(DataSet.Fields[LiContador].FieldName;


Te comento que Fields te proporciona bastante información sobre los campos devueltos en un dataset.


Suerte
__________________
Conoce mi blog http://www.edgartec.com
Responder Con Cita
  #3  
Antiguo 07-03-2007
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 21
enecumene Va por buen camino
gracias poliburro ire a probarlo bien pronto, luego te comento como me va...
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
  #4  
Antiguo 07-03-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 28
Lepe Va por buen camino
No haría falta ni ejecutar la consulta, creo que esto serviría:
Código Delphi [-]
var q:Tquery;
    i:integer;
begin
  q := Tquery.create(nil);
  q.databasename := 'c:\......';
  q.sql.text := select * from tabla;
  q.FieldsDef.Update;
  with q do
  for i:=0 to FieldsDef.Count-1 do
    combo.items.Add(Fieldsdef[i].FieldName);
freeandnil(q);
end;

[/saludos]
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
  #5  
Antiguo 07-03-2007
Avatar de poliburro
[poliburro] poliburro is offline
Miembro Premium
 
Registrado: ago 2004
Ubicación: México D.F
Posts: 3.068
Poder: 23
poliburro Va por buen camino
Cita:
Empezado por Lepe
No haría falta ni ejecutar la consulta, creo que esto serviría:

Código Delphi [-]
var q:Tquery;
i:integer;
begin
q := Tquery.create(nil);
q.databasename := 'c:\......';
q.sql.text := select * from tabla;
q.FieldsDef.Update;
with q do
for i:=0 to FieldsDef.Count-1 do
combo.items.Add(Fieldsdef[i].FieldName);
freeandnil(q);
end;




[/saludos]

Pues de hecho esa es una consulta. :|.
__________________
Conoce mi blog http://www.edgartec.com
Responder Con Cita
  #6  
Antiguo 07-03-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Si están usando el BDE, también pueden hacerlo así:

Código Delphi [-]
Session.GetFieldNames('nombre de la base', 'nombre de la tabla', ComboBox1.Items);

// Saludos
Responder Con Cita
  #7  
Antiguo 07-03-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 28
Lepe Va por buen camino
Si es una consulta, pero como ves no se ha abierto, no pide registros al servidor, solo crea los campos persistentes (que por supuesto tendrá que acceder al servidor para saber qué campos hay en dicha tabla).

En el caso de MDOLIB (e intuyo que IBX), también se puede obtener desde el database asociado, que dispone de estos 2 métodos públicos:
Código Delphi [-]
    procedure GetFieldNames(const TableName: string; List: TStrings);
    procedure GetTableNames(List: TStrings; SystemTables: Boolean = False);


Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
llenar un combobox fabian20s Conexión con bases de datos 13 30-11-2007 19:54:56
llenar un combobox con datos de una tabla edelphi Conexión con bases de datos 4 28-02-2007 13:06:37
URGENTE!!! Me Manda un error al llenar un combobox chetos7 SQL 4 15-01-2007 03:04:05
Como llenar un combo con campos seleccionados ? Luis Conexión con bases de datos 2 29-09-2004 09:50:04
Como llenar este comboBox pzala Varios 2 14-12-2003 22:26:22


La franja horaria es GMT +2. Ahora son las 13:13:55.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi