Главная страница
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.024 c
1-1121338649
webpauk
2005-07-14 14:57
2005.07.31
Свойства файла


14-1121095210
TUser
2005-07-11 19:20
2005.07.31
Карты Москвы


14-1121078518
cspr
2005-07-11 14:41
2005.07.31
Политическая карта мира


1-1121338623
BANick
2005-07-14 14:57
2005.07.31
обясните как переопределить interface (IBindStatusCallback)


5-1090854143
sirin
2004-07-26 19:02
2005.07.31
ActiveX Control