como recorrer un dbListBox!!

[Velia]

Hola a todos
Necesito seleccionar el texto de los items de un dblistbox en forma automática y secuencial, es decir sin que un mause seleccione los elementos uno por uno del ListBox.
Mi intención es que me lo haga desde el elemento 0 hasta la dimensión de éste, que puede ser obtenida por count-1.

Muchas Gracias y
Saludos a todos
Velia

[lucasarts_18]

Hola:

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 var
   cont : Integer;
 begin
   for cont := 0 to ListBox1.Items.Count - 1 do
   begin
     ListBox2.Items.Add := ListBox1.Items.Strings[cont];
     
   end;
 end;

Algo Así ?

Hasta Luego.

[Velia]

Ya Solucioné
Saludos
Velia

[[Lepe]]

Aunque llego un poco tarde, quizás te sirva todavía. Aquí tienes otro método:

Código Delphi [-]
  ListBox2.items.Assign(Listbox1.items);