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

Вниз

Сколько детей у корня TTreeView?   Найти похожие ветки 

 
Borealis   (2003-08-19 00:23) [0]

У каждого TTreeNode есть свойство Count с помощью которого можно выяснить сколько непосредственных детей, то есть без внуков :), содержит этот TTreeNode. А как узнать сколько непосредственных детей содержит корень дерева?

Свойство TreeView1.Items.Count возвращает общее количество элементов TTreeNode в дереве...


 
Nucl ©   (2003-08-19 00:53) [1]

может
TreeView1.Items[0].Count


 
Романов Р.В. ©   (2003-08-19 06:13) [2]

С помощью рекурсивного алгоритма


 
MBo ©   (2003-08-19 06:29) [3]

GetFirstNode+GetNextSibling


 
Borealis   (2003-08-19 21:48) [4]


> MBo © (19.08.03 06:29) [3]
> GetFirstNode+GetNextSibling
Огромное Спасибо. Это действительно работает :)

Примерно так:
function GetRootCount(TreeView: TTreeView): Integer;
var
Node: TTreeNode;
begin
Result := 0;
Node := TreeView.Items.GetFirstNode;
while Node <> nil do
begin
Inc(Result);
Node := Node.getNextSibling;
end;
end;


ps. Непонятно, почему Borland не предусмотрела такого свойства, ведь похожий кусок кода используется в методе TTreeNodes.WriteData, да и свойство весьма полезное :)



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

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

Наверх




Память: 0.47 MB
Время: 0.015 c
1-1431
vitnt
2003-08-19 10:09
2003.09.01
Как программно прокрутить memo на последнюю строку?


6-1524
Basil
2003-06-26 14:20
2003.09.01
закачка по FTP


3-1280
Fantasy
2003-08-09 05:34
2003.09.01
Есть ли в SQL втроеная переменная реального даты и времени


9-1266
Призрак_Коммунизма
2003-02-23 21:51
2003.09.01
Разные комбинации доспехов и оружия у героя


4-1718
AD
2003-06-30 15:01
2003.09.01
Как сделать модальный диалог БЕЗ рамки и caption a?