Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.03.05;
Скачать: [xml.tar.bz2];

Вниз

Treeview и Count   Найти похожие ветки 

 
Cherepah   (2004-02-23 05:27) [0]

Люди добрые! Подскажите... Есть дерево. Необходимо выяснить, сколько итемов находится в выделенной ветке включая все чайлды... TreeView1.Selected.Count показывает только по первому уровню итемов, а мне нужна полная ветка. С Уважением!


 
Algol   (2004-02-23 14:20) [1]

Рекурсивно. Типа такого

function GetDeepChildCount(Node:TTreeNode):Integer;
var i:Integer;
begin
result:=Node.Count;
for i:=0 to Node.Count-1 do
inc(result,GetDeepChildCount(Node.Item[i]));
end;


 
Cherepah   (2004-02-23 14:53) [2]

Огромное спасибо!

И еще вопрос:
Как можно сделать (если это возможно в стандартном дереве), чтобы во время Drag&Drop-а при необходимости скроллинговалось дерево и раскрывались узлы (а-ля Проводник)?



Страницы: 1 вся ветка

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

Наверх





Память: 0.44 MB
Время: 0.007 c
6-12475
Vinter
2003-12-30 13:25
2004.03.05
время отклика


1-12412
Ghost.
2004-02-22 17:39
2004.03.05
шрифты в Label


1-12421
VID
2004-02-23 00:42
2004.03.05
Добавление файла в ресурсы


8-12452
Meronikol
2003-11-02 05:37
2004.03.05
Помогите решить проблему


11-12303
Kirill
2003-06-10 15:50
2004.03.05
DBF и KOL





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский