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

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

узлы в TreeView [D7, XP]


witaly ©   (2008-08-06 13:05:00) 

Есть такая структура в дереве:
Node1
 Node1A
   Node1AA
   Node1AB
   Node1AC
 Node1B
Node2
...

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


{RASkov}   (2008-08-06 18:35:00) [1]

+ возможно, нужно проверять Node.Level, для пропуска нодов, глубже определенного уровня...


MsGuns   (2008-08-06 16:09:00) [2]

Если бы товарисчь заглянул в справку по TTreeNode, он бы не смог не заметить этот метод и не задавал бы тут таких вопросов


Ega23   (2008-08-06 13:14:00) [3]


> Ega23 ©   (06.08.08 13:13) [5]


опечатка:
while ( currNode<>nil) do


Ega23   (2008-08-06 13:13:00) [4]

procedure GetChildNodes(Node : TTreeNode);
var
 currNode : TTreeNode;
begin
 currNode :=  Node.GetFirstChild;
 while (Node<>nil) do
 begin
   GetChildNodes(currNode);
   currNode := currNode.GetNextSibling;
 end;
end;


Сергей М.   (2008-08-06 13:11:00) [5]

Node1A.GetNextSibling

получишь Node1B


Medbe}I{onok XML   (2008-08-06 13:11:00) [6]

через парент нод и некст сиблинг


Medbe}I{onok XML   (2008-08-06 13:11:00) [7]

или по следующему индексу чайда


brother   (2008-08-06 13:06:00) [8]

> в цикле обхожу все узлы

код может хоть покажешь?


Наверх

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