Developing.ru

Помогите с алгоритом сохранения
Есть дерево содержащее Н вложенностей и М 0 уровней
Надо сохранить
----------------------------
| Parent_ID | Child_ID |
----------------------------

Где каждый child_id будет ссылаться на своего paent_id

В цикл для каждого уровня и подуровня и пишешь построчно в файл, потом так же читаешь... Ну это самое простое...

Duncon,
Мне тож так сперва казалось, сейчас сижу думаю

обычная рекурсия, ещё со школы

Код: Выделить всё

Procedure SaveNode(Node: TNodeClass);
var
  i: Integer;
begin
  SaveToFile(Node.Id, Node.Parent.Id);
  for i := 0 to Node.Childs.Count-1 do SaveNode(Node.Child[i]);
end;

Developing.ru

Сохранение дерева

Сохранение дерева