Скачать: CL | DM;

как переписать итемы из листвью в файл при закрытии программы   Найти похожие ветки 

← →
miracle_fox ©   (2004-01-04 22:32) [0]

подскажите пожалуйста, как записать при закрытии программы все итемы из листвью в отдельный файл итемз.тхт (каждый итем отдельной строчкой)? как файловую переменную объявлять и всё такое ? ...

---

← →
miracle_fox ©   (2004-01-04 23:43) [1]

если кому-то интересно... я это уже сделал так:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var f:textfile;
i:integer;

assignfile(f,"list.txt");
rewrite(f);
for i:= 0 to (contactform.ListView1.Items.Count-1) do
begin
writeln(f,contactform.ListView1.Items.item[i].caption);
end;
closefile(f);
end;

---

← →
default ©   (2004-01-05 00:10) [2]

ListView1.Items.SaveToFile("list.txt")

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c