{ **** UBPFD *********** by delphibase.endimus.com ****
>> Получение пути заголовков к узлу в TreeView
Функция выдает путь к указанному узлу (к ноде) в TreeView
в виде строки заголовков узлов, разделенных символом Separator.
Зависимости: ComCtrls
Автор: lipskiy, lipskiy@mail.ru, ICQ:51219290, Санкт-Петербург
Copyright: Собственное написание (lipskiy)
Дата: 02 мая 2002 г.
***************************************************** }function GetPathToNode(Node: TTreeNode; Separator: Char): string;
begin
Result := "";
if Node = nilthen
exit;
while Node <> nildobegin
Result := Node.Text + Separator + Result;
Node := Node.Parent;
end;
Delete(Result, length(Result), 1);
end;
Если Вас заинтересовала или понравилась информация по разработке на Delph - "Получение пути заголовков к узлу в TTreeView", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу: Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!