Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Como utilizo un ComboBox Para Mostrar una lista de una Columna?? (https://www.clubdelphi.com/foros/showthread.php?t=45429)

foetus 03-07-2007 02:29:19

Como utilizo un ComboBox Para Mostrar una lista de una Columna??
 
Necesito Mostrar en un ComboBox Todos los registros de una determinada columna, como los podria mostrar?:rolleyes: , ya que solo logro que aparesca uno a la ves como con un edit......

reevil 03-07-2007 03:01:51

si estas hablando de columnas de un dbgrid entonces lo mejor seria utilizar un dblookupcombobox y te ahorras muchos problemas
si se trata de un grid comun y corriente debes hacer algo como esto:
Código Delphi [-]
//x, y son de tipo integer y se usan como coordenadas para localizar las celdas
//con un ciclo (for, while) recorrer tu columna
//por cada registro hacer algo como esto:

ComboBox1.Items.Add(StringGrid1.cells[x][y]);
saludos

gabrielkc 03-07-2007 04:27:00

ComboBox
 
con una tabla:

Código:

with Table1 do
 while not Eof do
  begin
    ComboBox1.Items.Add(FindField('campo').AsString);
    Next
  end;


foetus 05-07-2007 20:23:47

Ok. ya intente con el dblookupComboBox y me resulto perfectamente..
gracias reevil.. aunque no se cual es el grid sencillo solo conosco el dbgrid...


ahora bien. hice este codigo, pero me da error?

Código:

with Table1 do
while not Eof do
  begin
    ComboBox1.Items.Add(FindField('Precio').AsString);
    Next
  end;

me podria alguien decir, que debo de hacer aquy???

gabrielkc 06-07-2007 04:30:00

Que error te da??

eduarcol 06-07-2007 04:37:30

Cita:

Empezado por foetus

ahora bien. hice este codigo, pero me da error?

Código:

with Table1 do
while not Eof do
  begin
    ComboBox1.Items.Add(FindField('Precio').AsString);
    Next
  end;

me podria alguien decir, que debo de hacer aquy???

Bueno si se trata de adivinar yo creo que puede ser esto

Código:

with Table1 do
while not Eof do
  begin
    ComboBox1.Items.Add(FindField('Precio').AsString);
    Next;
  end;

Punto y coma al final del NEXT.


La franja horaria es GMT +2. Ahora son las 08:25:57.

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