Перейти к содержанию
Fire Monkey от А до Я
  • 0

Получить полный путь к корню


x11

Вопрос

Может кому пригодится.

Немножко запутался я, т.к. в FMX почти любая визуальная компонента может быть контейнером для другой компоненты.

 

Рабочий код.

function GetPathFromNode(AItem: TTreeViewItem): String;
begin
  if AItem = nil then exit('ничего не выбрано');

  while Assigned(AItem) and (AItem is TTreeViewItem) do
  begin
    Result := AItem.Text + '/' + Result;
    AItem := TTreeViewItem(AItem.ParentItem);
  end;

   Delete(Result, Length(Result), 1);
end;

 

проблема была у меня AItem.Parent

а правильно - AItem.ParentItem

Изменено пользователем x11
Ссылка на комментарий

Рекомендуемые сообщения

Ответов пока нет

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

×
×
  • Создать...