Einzelnen Beitrag anzeigen

s14

Registriert seit: 15. Mai 2003
Ort: München
251 Beiträge
 
Delphi 7 Architect
 
#2

Re: [ListView] hilfe bei speichern der Items etc.

  Alt 29. Dez 2005, 17:08
Hallo,
Du könntest einfach die Items des ListView durchlaufen und die Einträge als einzelne Sektionen speichern.

Delphi-Quellcode:
var
  i: Integer;
  Section: String;
begin
  with TIniFile.Create(ChangeFileExt(ParamStr(0), '.ini') do
  begin
    for i := 0 to ListView1.Items.Count -1 do
    begin
      Section := Format('Zeile_%d', [i]);
      WriteString(Section, 'Name', ListView1.Items[i].Caption);
      WriteString(Section, 'Aktion', ListView1.Items[i].SubItems[0]);
      WriteString(Section, 'Tasten', ListView1.Items[i].subItems[1]);
    end;
    Free;
  end;
  Mit Zitat antworten Zitat