Здравствуйте Slaveniya, Вы писали:

S>Здравствуйте Black angel, Вы писали:

BA>>Здравствуйте Slaveniya, Вы писали:

S>>>Здравствуйте Black angel, Вы писали:

BA>>>>Забиваются данные в TList, затем он вставляется в другой такой же (и так пока не кончатся данные, другими словами, строится дерево TList-ов), все входит ничего не выходит, как быть ?

S>>>А в чем собственно проблемма?

BA>>Да собственно проблема уже в том чтобы в динамически созданный лист (вернее указатель на лист), засунуть другой...
BA>>Тобишь типа:

BA>>...
BA>>var
BA>> List1, List2: ^TList;
BA>>begin
BA>> New(List1);
BA>> New(List2);
BA>> List1.Add(List2);
BA>>...

BA>>Ругается гад...

S>... и праввильно делает: ты не создал экземпляр класса TList и пытаешься вызвать его метод.
S>Делай так:

S>var
S> vList1, vList2: TList;
S>...
S>vList1 := TList.Create;
S>vList2 := TList.Create;
S>vList1.Add(vList2);

А как в таком случае быть с рекурсией ? Ведь лист заполняется рекурсивной функцией... После ее завершения все экземпляры удаляются из памяти, а определить их вне рекурсии невозможно, количество создаваемых объектов произвольно...