mostrar resultado de un query en un listbox

[yossi]

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?

[[movorack]]

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

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;

[yossi]

gracias por responder

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

[[movorack]]

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.

[*Caro*]

Hola

Empezado por movorack

Ahora si quieres mostrar los nombres y apellidos como si fueran columnas dentro del ListBox...

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

[[movorack]]

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

[yossi]

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