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

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

как засунуть деревце в файл?


Asderg ©   (2002-09-04 05:56:00) 

Господа профи, подскажите, как засунуть в файл СВОЕ дерево (TreeView не нужен). Допустим, у меня есть

pTMyTreeNode = ^TMyTreeNode;
TMyTreeNode=class
private
id : array[0..9] of char;
child : array[0..3] of pTMyTreeNode;
public:
//...
published
//...
end;

TMyTree=class
private
treeid : array[0..19] of char;
root : pTMyTreeNode;
public:
//..
published
//..
end;


как сделать, например

fs:=TFileStreamCreate("tree.dat", fmOpenRead);
mytree.SaveToStream(fs);

или что-то типа этого. Что от чего наследовать и как сохранятся ссылки на child, они ведь указатели в памяти? :-\
Ответьте лучше на мыло : asderg@yandex.ru
Поможите, люди добрые... :)


asderg   (2002-09-06 06:05:00) [1]

всем спасибо. уже сделал...


MBo   (2002-09-04 12:29:00) [2]

пишешь примерно так - уровень узла, данные узла, затем так же детишек (рекурсивно)
0
node1
1
node11
1
node12
2
node121
2
node122
1
node13
0
node2
и т.д.
Тогда и читать легко.


asderg   (2002-09-04 12:20:00) [3]

неужели никто не <bold>поможет</bold> ? ... :~((


Наверх

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