Convertir items de ListBox a String

[j_flores3000]

Bueno necesito hacer esto, pasarlo a un edit o simplemente guardar todos los items en una variable string. se puede hacer?

[marcoszorrilla]

Prueba esto:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var
n:Integer;
begin
 for n:=0 to Listbox1.Items.Count -1 do
 begin
 Edit1.Text:=Edit1.Text+listbox1.Items[n]+' ';
 end;

end;

Un Saludo.

[[coso]]

...o bien

Código Delphi [-]
Edit1.Text := ListBox1.Items.Text;
// ... o ...
Edit1.Text := ListBox1.Items.CommaText;

[j_flores3000]

Muchas gracias a los dos. Se puede dar por solucionado el tema!