Форум: "Основная";
Поиск по всему сайту: 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.72 MB
Время: 0.022 c
3-21910           Wladimir              2001-12-04 08:01  2002.01.08  
Количество записей в таблице?


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


1-22018           DelphiG               2001-12-18 01:51  2002.01.08  
Печать текста из Memo! У меня что то не так....


14-22323          Melamed               2001-11-04 19:57  2002.01.08  
Как исправить данные анкетные, веденные при регистрации?


1-22186           ShnurO.K.             2001-12-15 23:05  2002.01.08  
Как скрыть свою программу при нажатие Alt+Ctrl+Del?