| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как сохранить/загрузить содержимое ListView в файл? [D7, WinXP]

rolex ©   (2005-06-28 12:16:00) 

Как сохранить/загрузить содержимое ListView в файл, т.е. нужно как-то пробежаться по всем колонкам и строкам.
Прошу сохранение компонента не предлагать.

---

ssk   (2005-06-29 09:32:00) [1]

ищи компонент sskListView.
я там "привинтил" методы записи/чтения в/из файл(а). корявенько правда. лишнего много, а убрать влом. но работает. а заодно более простой способ доступа к ячейкам сетки.

---

rolex   (2005-06-28 13:21:00) [2]

спасибо!

---

Digitman   (2005-06-28 13:13:00) [3]

i:=0;
while i < list.Count do
begin
li := ListView.Items.Add; // li: TListItem;
li.Caption := list[i];
li.Subitems.Add(list[i+1]);
inc(i, 2);
end;

---

rolex   (2005-06-28 13:06:00) [4]

Предположим, что у нас 2 колонки и N строк:
Сохранение:
var list:Tstrings;

begin
list:=TStringlist.Create;
for i := 0 to ListView.Items.Count - 1 do
begin
list.add(ListView.Items[i].Caption);
list.add(ListView.Items[i].SubItems.Strings[0]);
end;
list.SaveToFile('listview.dat');
list.free;
end;

Загрузка:
var list:Tstrings;

begin
list:=TStringlist.Create;
list.loadFormFile('listview.dat');
Вот тут как написать????
list.free;
end;

---

Digitman   (2005-06-28 12:36:00) [5]

> я не могу сам это сделать


что не можешь ?
что тебе непонятно ? конкретно ?

---

-=XP=-   (2005-06-28 12:36:00) [6]

for i := 0 to ListView.Items.Count - 1 do
begin
 // Что угодно в контексте текущей строки ListView.Items[i]
 // В том числе и сохранение "нужных" колонок
end;

---

rolex   (2005-06-28 12:27:00) [7]

Это я знаю. Но мне нужен пример, т.к. я не могу сам это сделать.

---

-=XP=-   (2005-06-28 12:18:00) [8]

"нужно <...> пробежаться по всем колонкам и строкам"

---

Наверх