Listview Items in eine Ini-Datei schreiben

[neolithos]

So könnte man schreiben

Delphi-Quellcode:

var sTmp : String;
    i, j : Integer;

for i := 0 to lst.Count - 1 do
    begin
      sTmp := '';
      for j := 0 to lst.Items[i].SubItems.Count - 1 do
          sTmp := sTmp + ';' + lst.Items[i].SubItems[j];
      ini.WriteString('ListView', lst.Items[i].Caption, sTmp);
    end;