Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Как перебрать корневые узлы в TTreeView ? 


ikar   (2001-12-21 09:10) [0]

Нужно перебрать только те которые находятся в корне, или хотябы идентифицировать в корне данный узел или нет.



Praco   (2001-12-21 09:21) [1]

for i:= 0 to TreeView1.Items.Count - 1 do
if TreeView1.Items[i].Level = 0 then
ShowMessage("Корень");



McSimm   (2001-12-21 10:42) [2]

Можно не перебирать все дерево, а взять первый элемент и перебрать его собратьев:
N := Items[0]
while Assigned(N) do
begin
ShowMessage(N.Text);
N := N.GetNextSibling
end




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.024 c
3-21919           VS                    2001-12-04 14:07  2002.01.08  
Чтение и исправление данных из базы формата DBF Visual FoxPro 6.0


3-21942           Rev                   2001-12-03 12:19  2002.01.08  
Добрые люди помогите с хранимой процедурой.


1-22238           T2                    2001-12-16 07:29  2002.01.08  
Определить номер пункта меню


6-22268           Voha                  2001-10-05 13:25  2002.01.08  
В компоненте WebBrowser нет параметра referer


3-21904           Андрей                2001-11-29 22:18  2002.01.08  
query