Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TTreeView [D7]


Wind ©   (2007-12-13 05:07:00) 

Здравствуйте мастера.
Подскажите пожалуйста каким образом можно узнать полный путь к одному из элементов TTreeView ?
Т.е. по выделению элемента (TTreeNode) необходимо получить имена всех вышестоящих над ним элементов вплть до корня.


Wind   (2007-12-13 06:31:00) [1]

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


Джо   (2007-12-13 06:31:00) [2]

> [4] Wind   (13.12.07 06:27)
> Просто без примера с этим возникнет еще масса вопросов например
> таких "как узнать это корневой узел или нет" и так далее...

У корневого узла Paren равен nil...


Джо   (2007-12-13 06:31:00) [3]

Ну вот, уже все готовеньким испортили :)


ЮЮ   (2007-12-13 06:28:00) [4]

> В общем понял,

не похоже

> ссылочку на какой нить ресурс

уж лучше 6 строк кода :)

node := TreeView.Selected;
Result := node.Text;
while node.Parent <> nil do begin
 node := node.Parent;
 Result := node.Text + '\' + Result;
end;


Wind   (2007-12-13 06:27:00) [5]

> В общем понял, но если не трудно примерчик иди ссылочку
> на какой нить ресурс или хелп...

Просто без примера с этим возникнет еще масса вопросов например таких "как узнать это корневой узел или нет" и так далее...


Wind   (2007-12-13 06:19:00) [6]

В общем понял, но если не трудно примерчик иди ссылочку на какой нить ресурс или хелп...


MBo   (2007-12-13 05:54:00) [7]

Пардон - пройти в цикле, рекурсия не нужна.


MBo   (2007-12-13 05:53:00) [8]

рекурсивно пройти по Parent


Наверх

Титульная страница Поиск, карта сайта Написать письмо