Rundenzähler für mehrere Läufer (Delphi 7 Prof)

[Klaus01]

Guten Abend,

wenn Du "nur" die Captions der ListView abspeichern willst.
Würde ich das mit einer StringList erledigen.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  sl : TStringList;
  i: Byte;
begin
   sl := TStringList.Create;
  try
    for i:=0 to listView1.Items.Count -1 do
      sl.add(listView1.Items[i].caption);
    sl.SaveToFile('.\Liste.csv');
  finally
    sl.free;   
  end;
end;

Grüße
Klaus