Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.09.21;
Скачать: CL | DM;

Вниз

TTreeView - просмотреть все дочерние узлы одного узла   Найти похожие ветки 

 
comovets   (2008-08-10 20:47) [0]

Беру из TTreeView произвольный узел и хочу перебрать в цикле все его дочерние узлы (абсолютно все, даже те которые являются многоуровнево-вложенными). Как это сделать? Я не могу придумать этот простецкий цикл...


 
Германн ©   (2008-08-10 20:57) [1]

Проход по Items с рекурсией если HasChildren


 
b z   (2008-08-10 20:58) [2]

А зачем сразу все?


 
aaaaa   (2008-08-10 20:59) [3]

procedure GetChildTree(aNode: TTreeNode);
 procedure GetN(aNode: TTreeNode);
 begin
   //тут чето с ним делашь с aNode;
   if aNode.getNextSibling <> nil
     then GetN(aNode.getNextSibling);
   if aNode.HasChildren then
     GetN(aNode.getFirstChild);
 end;
begin
 //тут чето с ним делашь с aNode;
 if aNode.HasChildren then
   GetN(aNode.getFirstChild);
end;



Страницы: 1 вся ветка

Текущий архив: 2008.09.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
15-1217235189
Ega23
2008-07-28 12:53
2008.09.21
Посоветуйте книжку по основам Java-Script


2-1218439126
Нов_и_чок
2008-08-11 11:18
2008.09.21
Из ASCII в ANSI


15-1217504410
Правильный$Вася
2008-07-31 15:40
2008.09.21
как перевести на английский


11-1193554558
files32
2007-10-28 09:55
2008.09.21
RTTI или как его там в KOL


8-1185991832
DelphiKettle
2007-08-01 22:10
2008.09.21
MediaPlayer