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

ListView Save и Load..?   Найти похожие ветки 

← →
AST   (2003-04-17 17:22) [0]

Подскажите уважаемые, как сохранить все содержимое ListView и как потом считать данные из файла в этот компанент. Заранее спасибо.

---

← →
BBCHa ©   (2003-04-17 17:59) [1]

По идее свою функцию писать

---

← →
AST   (2003-04-17 18:29) [2]

Хм, а смысл этого компанента, если его состояние нельзя сохранить стандартными функциями?

---

← →
BBCHa ©   (2003-04-17 18:41) [3]

Ну вот представь проводник Windows, где список файлов ты сохраняешь в файл, а потом оттуда загружаешь??? Если смысл??? Этот компонент существует для структурного, упорядоченного отображения данных

---

← →
AST   (2003-04-17 18:50) [4]

Смысл есть, мне иногда так надо сохранить список всех файлов папки в ТХТ файл :)

---

← →
BBCHa ©   (2003-04-17 18:54) [5]

тогда при чем тут ListView? Маленькаяпроцедурка из пяти строк, за основу берешь FindFirst, FindNext

---

← →
AST   (2003-04-17 20:06) [6]

:)))
Спасибо, но это я так просто к слову сказал, что было бы не плохо елси бы проводник мог эту функцию выплнять :)
Мне надо просто сохранить содержимое в файл. А можно по столбикам все перенести в ListBox и сохранить от туда в файл а затем все перенести из ListBox в столбик ListView?

---

← →
AST   (2003-04-17 22:38) [7]

Наконец нашел ответ на свой вопрос. Может кому-то пригодится.
//Сохранение
var
Writer : TWriter;
FileStream : TFileStream;
begin
if SaveDlg.Execute then begin
FileStream:=TFileStream.Create(SaveDlg.FileName,fmOpenWrite or fmCreate);
Writer := TWriter.Create(FileStream, SizeOf(ListView1));
Writer.WriteRootComponent(ListView1);
Writer.Free;
FileStream.Free;
end;
// Чтение
var
reader : TReader;
FileStream : TFileStream;
begin
if OpenDlg.Execute then begin
FileStream:=TFileStream.Create(OpenDlg.FileName,fmOpenread);
Reader := TReader.Create(FileStream, SizeOf(ListView1));
Reader.ReadRootComponent(ListView1);
Reader.Free;
FileStream.Free;
end;

---

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

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



Память: 0.46 MB
Время: 0.009 c