[DELPHI] ListBox Czyli chodzi o Playlistę

Jam mogę zapisać i oczytać ListBox za pomocą SaveDialog oraz OpenDialog? Czytałem w FAQ ale nie o to mi chodzi. Jestem zielony i dopiero się uczę. Pomóżcie.

---

Np:
Zapis:
var  I: Integer;  Ini: TIniFile; begin  if SaveDialog1.Execute then  begin    Ini:= TIniFile.Create(SaveDialog1.FileName);    for I:= 0 to ListBox1.Items.Count - 1 do    Ini.WriteString('ListBox1', ListBox1.Items.Strings[I], '##');    Ini.Free;  end;
i odczyt:
var  Ini: TIniFile; begin  if OpenDialog1.Execute then  begin    Ini:= TIniFile.Create(OpenDialog1.FileName);    Ini.ReadSection('ListBox1', ListBox1.Items);    Ini.Free;  end;


Zapis:
var  I: Integer;  Ini: TIniFile; begin  if SaveDialog1.Execute then  begin    Ini:= TIniFile.Create(SaveDialog1.FileName);    for I:= 0 to ListBox1.Items.Count - 1 do    Ini.WriteString('ListBox1', ListBox1.Items.Strings[I], '##');    Ini.Free;  end;

No i pięknie tylko co się zapisze ??

BTW Po kiego tyle kombinacji ??

Myślę że się zapisze co trzeba, ba nawet to działa :)

---

Myślę że się zapisze co trzeba, ba nawet to działa :)

A ja mysle ze tak bedzie prosciej:
if SaveDialog1.Execute then  ListBox1.Items.SaveToFile(SaveDialog1.FileName);
odczyt:
if OpenDialog1.Execute then  ListBox1.Items.LoadFromFile(OpenDialog1.FileName);
prawda? :)

Wszystko ładnie, pięknie chodzi.l Ale jak zapisać o określonym rozszerzeniu pliku ? W SaveDialog mam ustawiony Filtr

W ObjectInspectorze zmień domyślne rozszerzenie na swoje i już ;)

zanotowane.pl

doc.pisz.pl

pdf.pisz.pl

zsf.htw.pl