Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Количество [D6, WinXP]


Ag2002 ©   (2002-09-13 17:34:00) 

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


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

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


McSimm   (2002-09-13 18:21:00) [2]

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

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


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

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

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

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

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


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

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


DiHLoS   (2002-09-13 17:50:00) [5]


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;


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

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


McSimm   (2002-09-13 17:40:00) [7]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо