Форум: "Основная";
Поиск по всему сайту: 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.024 c