Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.01.13;
Скачать: CL | DM;

Вниз

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

 
Wind   (2007-12-13 05:07) [0]

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


 
MBo ©   (2007-12-13 05:53) [1]

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


 
MBo ©   (2007-12-13 05:54) [2]

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


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

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


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

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

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


 
ЮЮ ©   (2007-12-13 06:28) [5]

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

не похоже

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

уж лучше 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:31) [6]

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


 
Джо ©   (2007-12-13 06:31) [7]

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

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


 
Джо ©   (2007-12-13 06:31) [8]

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



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

Текущий архив: 2008.01.13;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.012 c
2-1197553561
Крот
2007-12-13 16:46
2008.01.13
Проблем при подключении модуля


15-1197038772
Kolan
2007-12-07 17:46
2008.01.13
Как можно бороться с деблями в БД.


15-1197264407
Gydvin
2007-12-10 08:26
2008.01.13
windows server 2003 и русские названия папок


15-1196924925
TUser
2007-12-06 10:08
2008.01.13
Спам непобедим?


6-1178348077
Анонимщики
2007-05-05 10:54
2008.01.13
Pipe, информация о клиенте