Форум: "Начинающим";
Текущий архив: 2006.10.22;
Скачать: [xml.tar.bz2];
ВнизTreeView Найти похожие ветки
← →
Roma L (2006-10-04 11:13) [0]Необходимо получить список из всех внутренних элементов treeView. Если конкретно, то пусть имеется дерево
1-
-2
-3
-4
-5
-6
-7
И необходимо составть список вида 2,3,6,7, но для произвольного дерево. Кто -нибудь знает хороший метод.
Заранее спасибо!.
← →
Dmitrij_K (2006-10-04 11:14) [1]перебор
ListView.Items[].Level
← →
MBo © (2006-10-04 11:26) [2]что такое внутренние элементы???
В примере это похоже на листья - тогда обойти дерево (рекурсивно, например), и проверять Node.Count
← →
UDPS (2006-10-04 11:33) [3]Попробуй так:
procedure TForm1.Button1Click(Sender: TObject);
var
i,n:integer;
begin
n:=Tree.Items.Count;
for I := 0 to n-1 do
begin
if not Tree.Items[i].HasChildren then
ShowMessage(Tree.Items[i].Text);
end;
end;
← →
UDPS (2006-10-04 11:33) [4]Попробуй так:
procedure TForm1.Button1Click(Sender: TObject);
var
i,n:integer;
begin
n:=Tree.Items.Count;
for I := 0 to n-1 do
begin
if not Tree.Items[i].HasChildren then
ShowMessage(Tree.Items[i].Text);
end;
end;
← →
Roma L (2006-10-04 11:35) [5]Большое спосибо, но я поступил так
n:=Tree.Items.Count;
for I := 0 to n-1 do
begin
if not Tree.Items[i].HasChildren then
ShowMessage(Tree.Items[i].Text);
end;
end;
← →
Dmitrij_K (2006-10-04 11:41) [6]Offtop
зачем?n:=Tree.Items.Count;
for I := 0 to n-1 do
если можноfor I := 0 to Tree.Items.Count-1 do
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.10.22;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.052 c