Playlist items aus .ini laden

[-homer-]

hi,

wie einige von euch sicher wissen: Ich bin gerade dabei eine verbesserte Anwendung vom MediaCenter zu programmieren. Jetzt sind leider noch einige Fragen offen. Eine werde ich hier stellen:

Wie kann ich meine items aus einer LisBox in einer .ini speichern und sie beim nächsten starten des Programms wieder laden??? Wisst ihr wie es geht???


-homer-

[scp]

Schreiben:

Delphi-Quellcode:

uses
  IniFiles;
//...

with TIniFile.Create('C:\meine.ini') do
  try
    WriteInteger('MeineSection', 'Count', ListBox1.Items.count);
    for i := 0 to ListBox1.Items.count-1 do
      WriteString('MeineSection', 'Item' + IntToStr(i), ListBox1.Items[i]);
  finally
    Free;
  end;

Lesen:

Delphi-Quellcode:

with TIniFile.Create('C:\meine.ini') do
  try    
    for i := 0 to ReadInteger('MeineSection', 'Count', 0)-1 do
      ListBox1.Items.Add(ReadString('MeineSection', 'Item' + IntToStr(i), ''));
  finally
    Free;
  end;

Mit ner Textdatei gehts aber auch einfacher:

Delphi-Quellcode:

ListBox1.Items.SaveToFile('C:\meine.txt');
ListBox1.Items.LoadFromFile('C:\meine.txt');

[-homer-]

hi,
danke hat mir geholfen