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

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

сохранить дерево TreeView с данными


GVital ©   (2005-11-14 13:15:00) 

GVital   (14.11.05 13:13)  
Я хочу сохранить дерево TreeView с данными Data его узлов, и чтобы их потом можно было загружать. Как Мне Это сделать?


Digitman   (2005-11-14 15:40:00) [1]

fs: TStream;
ptr: Pointer;

..

fs.WriteComponent(TreeView);
for i:= 0 to TreeView.Items.Count - 1 do begin
 ptr := TreeView.Items[i].Data;
 fs.WriteBuffer(p, SizeOf(p));
end;

..
fs.ReadComponent(TreeView);
for i:= 0 to TreeView.Items.Count - 1 do begin
 fs.ReadBuffer(p, SizeOf(p));
 TreeView.Items[i].Data := ptr;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо