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

Вниз

Перебрать TreeView   Найти похожие ветки 

 
CrazyHackers ©   (2002-08-13 15:11) [0]

Привет!
Хотел бы занести структуру дерева в таблицу (стандартная структура: id, родитель, название).

Не знаю как перебрать весь treeview, определяя при этом имеет ли ветвь подветви. И как вообще правильнее бы это сделать?

Помогите пожалуйста.


 
Skier ©   (2002-08-13 15:19) [1]

>CrazyHackers



> Не знаю как перебрать весь treeview


Можно так :


var
CurrTreeNode : TTreeNode;
//..................
CurrTreeNode := ATreeView.Items.GetFirstNode;
while CurrTreeNode <> nil do begin
CurrTreeNode := CurrTreeNode.GetNext;
end; //while
//..................


 
CrazyHackers ©   (2002-08-13 15:25) [2]

А как проверить есть ли "детки"?


 
Skier ©   (2002-08-13 15:28) [3]

>CrazyHackers

CurrTreeNode.HasChildren или CurrTreeNode.Items.Count > 0


 
CrazyHackers ©   (2002-08-13 15:40) [4]

:) немного подумав, решил что проще узнавать родителя, так как сразу смогу получить его идентификатор, а значит занести в таблицу. Как в этом случаи? Что я должен передать в качестве парметра?


 
Skier ©   (2002-08-13 15:43) [5]

>CrazyHackers

if CurrTreeNode.Parent <> nil then begin
with CurrTreeNode.Parent do begin
end; //if
end; //if



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

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

Наверх




Память: 0.47 MB
Время: 0.011 c
1-71177
cult
2002-08-09 16:15
2002.08.22
Как сделать форму Always-on-top?


1-71263
fedia
2002-08-12 10:58
2002.08.22
Где находятся ресурсы IDE Delphi?


6-71288
Spartak
2002-06-09 23:46
2002.08.22
Подскажите пожайлуста как сделать пинг.


3-70974
Alexsys
2002-07-29 20:36
2002.08.22
Возвращаясь к поиску по нескольким полям сразу...


4-71440
Lina
2002-06-20 13:05
2002.08.22
Маленький вопрос про чтоб виртуальный диск