Форум: "Основная";
Поиск по всему сайту: 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.74 MB
Время: 0.491 c
1-22203           T2                    2001-12-16 07:07  2002.01.08  
Отлов ошибки отсутствия msWord


1-22051           kay                   2001-12-18 22:22  2002.01.08  
RichEdit


1-22071           KAA                   2001-12-19 10:48  2002.01.08  
Два сервиса мешают друг другу.


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


1-22183           XeN                   2001-12-21 11:21  2002.01.08  
DelphiX_play