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

Вниз

узлы в TreeView   Найти похожие ветки 

 
witaly   (2008-08-06 13:05) [0]

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

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


 
brother ©   (2008-08-06 13:06) [1]

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

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


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

Node1A.GetNextSibling

получишь Node1B


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

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


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

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


 
Ega23 ©   (2008-08-06 13:13) [5]

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


 
Ega23 ©   (2008-08-06 13:14) [6]


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


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


 
MsGuns ©   (2008-08-06 16:09) [7]

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


 
{RASkov} ©   (2008-08-06 18:35) [8]

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



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

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

Наверх




Память: 0.48 MB
Время: 0.015 c
2-1218092470
Нов_и_чок
2008-08-07 11:01
2008.09.21
RAR or ZIP in Delphi


15-1217501373
Nic from the WORK
2008-07-31 14:49
2008.09.21
Выбор ноутбука. Часть 3


2-1218291171
REX
2008-08-09 18:12
2008.09.21
Файлы


15-1217383248
Slider007
2008-07-30 06:00
2008.09.21
С днем рождения ! 30 июля 2008 среда


3-1206100897
Int23
2008-03-21 15:01
2008.09.21
Как передать русскую строку в ХП на MS SQL 2005 из D7