Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c