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

Вниз

Количество   Найти похожие ветки 

 
Ag2002   (2002-09-13 17:34) [0]

Народ подскажите пожалуйста как узнать количество узлов находящихся на каком либо уровне без вложеных в него узлов т.е.
1
2
3
3
2
3
3
4
2
А мне нужно узнать количество только 2. Как это сделать ?


 
McSimm ©   (2002-09-13 17:40) [1]

TTreeNode.Count
Indicates the number of direct descendants of a tree node.


 
Ag2002   (2002-09-13 17:45) [2]

А как это написать в программе ?



 
DiHLoS ©   (2002-09-13 17:50) [3]


procedure TForm1.Button1Click(Sender: TObject);
var
i,num:integer;
begin
num:=0;
for i:=0 to TreeView1.Items.Count-1 do
if TreeView1.Items.Item[i].Level=1 then inc(num); //подсчитываем кол-во узлов на 2 уровне
Label1.Caption:=IntToStr(num);
end;


 
McSimm ©   (2002-09-13 17:58) [4]

> Ag2002
Извиняюсь, я неправильно понял вопрос


 
Ag2002   (2002-09-13 18:10) [5]

Спасибо за пример, но я тут попробывал написать так

...
if TreeView1.Selected.Level = 1 then

... := TreeView1.Selected.Count
....

и тоже правлено работает !!! Почему ?


 
McSimm ©   (2002-09-13 18:21) [6]

Что тебе надо подсчитать?

Все элементы N-го уровня?
или
Все элементы N-го уровня, с общим родителем?


 
Ag2002   (2002-09-13 18:28) [7]

Нет все элементы только N-го уровня !!!
Но даже там где есть подузлы ко 2 например уровню такой вариант катит ??? ни понимаю почему



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
3-85327
Gaber
2002-09-04 13:01
2002.09.26
SQL запрос


4-85752
stainer
2002-08-10 02:08
2002.09.26
wh_shell hook (абочий, но корявый)


1-85602
Ag2002
2002-09-14 12:13
2002.09.26
TreeView


3-85378
Beer
2002-09-04 17:26
2002.09.26
select distinct


1-85482
Ежик
2002-09-16 16:38
2002.09.26
Как из txt файла вывести в memo слова начинающие, на букву