von memo lines add, filelistbox.items[i]..und anderen helden

[Sharky]

Hai agm65,

baue dir doch in einer Schleife eine String-Variable zusammen mit allen einträgen deiner Listbox und "adde" dann diesen String.

Delphi-Quellcode:

var
 ndx : Integer;
 s_lbitems : String;
begin 
  s_lbitems := '';
  for ndx := 0 to listbox1.items.count-1 do
    begin
      s_lbitems := s_lbitems + lisbox1.itmes[ndx];
    end;
  memo1.lines.add (s_lbitems);
end;