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

Вниз

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

 
azl ©   (2007-01-11 13:10) [0]

Доброго времени суток, уважаемые мастера.
Возник вопрос по работе с TreeView.
Есть дерево:

строка1
   |_подстрока1_1
строка2
   |_подстрока2_1
   |_подстрока2_2
   |_подстрока2_3
   |_подстрока2_4

Как мне програмно получить список именно Строк (в данном случае строка1 и строка2), например, их Текст?

Заранее благодарю за помощь.


 
Сергей М. ©   (2007-01-11 13:21) [1]

Корневые узлы имеют св-во Parent = nil, отсюда и пляши.


 
MBo ©   (2007-01-11 13:31) [2]

GetFirstNode + GetNextSibling


 
azl ©   (2007-01-11 14:06) [3]

Спасибо большое за помощь. Вот, что нашел:

Var
ANode: TTreeNode;
Begin
ANode:= TreeView1.Items.GetFirstNode;
While ANode <> Nil do
  Begin
    ListBox1.Items.Add(ANode.Text);
    ANode:= ANode.GetNextSibling;
  End;
End;



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

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

Наверх




Память: 0.44 MB
Время: 0.045 c
15-1168465744
normandia
2007-01-11 00:49
2007.01.28
Впервые столкнулся с Win XP Home Edition. Плачевно.


15-1168381558
SkyRanger
2007-01-10 01:25
2007.01.28
Урезанный редактор D6 Personal


2-1168593143
vigo_
2007-01-12 12:12
2007.01.28
Вызов переменной из другого Unit a


15-1167991529
alexeis
2007-01-05 13:05
2007.01.28
Установить принтер, не подключая его


15-1168573828
Slider007
2007-01-12 06:50
2007.01.28
С днем рождения ! 12 января





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский