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

Вниз

Как "распутать" обратный путь в TTreeView у TTreeNode   Найти похожие ветки 

 
mmms   (2005-07-11 00:06) [0]

у субменю не важно какого порядка. Т.е. есть пример

+продукты
+фрукты
 +цитрусовые
  -мандарины
  -апельсины
  -лимоны
+овощи


Если выделить мандарины, нужно получить строку вида
продукты-фрукты-цитрусовые-мандарины
Заранее благодарен.


 
Юрий Зотов ©   (2005-07-11 00:14) [1]

function GetFullNodeName(Node: TTreeNode): string;
begin
 Result := Node.Text;
 while Node.Parent <> nil do
 begin
   Result := Node.Parent.Text + "-" + Result;
   Node := Node.Parent
 end
end;


 
Anatoly Podgoretsky ©   (2005-07-11 00:14) [2]

Parent рекурсивно


 
mmms   (2005-07-11 08:33) [3]

Юрий Зотов ©   (11.07.05 00:14)
Anatoly Podgoretsky ©   (11.07.05 00:14)

Большое спасибо!



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

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

Наверх




Память: 0.47 MB
Время: 0.053 c
3-1118924142
Lenz
2005-06-16 16:15
2005.07.31
Как изменить структуру базы данных (dbf) если исходная на SQL


14-1121062471
Alex_
2005-07-11 10:14
2005.07.31
Запрет доступа к $C


6-1113840746
_Seldon_
2005-04-18 20:12
2005.07.31
Контекстное меню дла файла в сети


14-1120921148
Soft
2005-07-09 18:59
2005.07.31
Допускает ли Бог познание мира, а стало быть самого себя?


6-1113822641
Gek1
2005-04-18 15:10
2005.07.31
Socket Error 10038