![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
сохранить дерево 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;