mostrar resultado de un query en un listbox
 

hola, de nuevo tengo una pregunta, tengo un query con la siguiente consulta select nombre, apellido from clientes, y necesito mostrar esos campos en un listbox, pero no tengo ni la menor idea de como hacerlo, podrian ayudarme?

hola yossi... ¿como andan mario y luigi? :D

Serio... El listbox tiene una propiedad que es Items (TStrins), lo que debes hacer es abrir el dataset y luego recorrerlo... en el recorrido vas llenando los items uno por uno.

Código Delphi [-]
Query.SQL.Clear;
Query.SQL.add('select nombre, apellido from clientes');
Query.Open;

ListBox.Items.Clear;
Query.First; //Esto podria ser innecesario pero lo coloco por maña ;)
While not Query.eof do
begin
  ListBox.Items.Add(Query.FieldByName('nombre').AsString);
  Query.Next;
end;

gracias por responder

pero necesito mostrar varios campos de mi tabla en el listbox, sabrias como puedo hacerlo?

hey no me dijiste como estaban los hermanos... pero bueno... si quieres mostrar varios campos podrias concatenarlos en la misma consulta

Código SQL [-]
Select (nombre || ' '|| apellido) as nombre from clientes;

o en el ciclo...

Código Delphi [-]
  nombre := Query.FieldByName('nombre').AsString + ' ' + Query.FieldByName('apellido').AsString;
  ListBox.Items.Add(nombre);

Ahora si quieres mostrar los nombres y apellidos como si fueran columnas dentro del ListBox... el componente estandar no te servirá y deberás buscar otro componente... espera y busco un nombre... buscando.... huy... me demore un ratico... jejeje... Una vez probé un componente llamado TColumnComboBox... de TMS Software; Me pareció interesante pero no hice esa inverión a la final.

oye... mario y la princesa nunca tuvieron hijos? eeehhhh... bueno... espero te sirva el dato.

Hola

Si se quiere mostrar en varias columnas se puede hacer como te indican en esta pagina.

Código Delphi [-]
   ..............................
   ListBox1.Items.Add(Query.FieldByName('nombre').AsString +^I+ Query.FieldByName('apellido').AsString) ;
   ..............................

Y no te olvides poner el ancho de tus columnas en la propiedad TabWith.

Saluditos

Me interesa el articulo... lo voy a leer ahorita voy de carrera... gracias caro :D

gracias a ambos por responder quedo perfecto.

pd: movorack hasta ahora entiendo lo que dijiste de los hermanos, no recordaba que yossi era el pequeño dinosaurio