Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c
1-85421
Eugene Shebeko
2002-09-12 20:55
2002.09.26
Как отключить перерисовку окна?


3-85360
GWeber
2002-09-04 12:33
2002.09.26
DBComboBox


1-85467
Freeze
2002-09-13 09:16
2002.09.26
Подскажите как создавать пароли и где их хранить!!!


1-85437
SoniK
2002-09-14 23:02
2002.09.26
Компонет


1-85487
John Kayfolom
2002-09-16 15:52
2002.09.26
Разложить Integer (32бита) на 4 байта




   Наверх