Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.03.2011, 10:28   #1
firephenix
Пользователь
 
Регистрация: 14.02.2011
Сообщений: 89
По умолчанию TreeView

Можно ли вывести путь какой-нибудь папки из TreeView в Edit (то есть преобразовать TTreeNode в String)
firephenix вне форума Ответить с цитированием
Старый 08.03.2011, 11:39   #2
asmodey1
Подтвердите свой е-майл
 
Регистрация: 19.12.2010
Сообщений: 808
По умолчанию

Хэлпом пользоваться Заратустра не велит?
Код:
procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
Edit1.Text:=TreeView1.Selected.Text;
end;
asmodey1 вне форума Ответить с цитированием
Старый 08.03.2011, 12:31   #3
firephenix
Пользователь
 
Регистрация: 14.02.2011
Сообщений: 89
По умолчанию

Спасибо, но э то не то. Мне нужен именно путь, а не имя выбраного пункта. Например : Ягоды=>Арбуз=>Зелёный
firephenix вне форума Ответить с цитированием
Старый 08.03.2011, 13:39   #4
asmodey1
Подтвердите свой е-майл
 
Регистрация: 19.12.2010
Сообщений: 808
По умолчанию

Хэлпом принципиально пользоваться не желаете ?
Код:
procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
Edit1.Text:=TreeView1.Selected.Text+'<='+TreeView1.Selected.Parent.Text+'<='+TreeView1.Selected.Parent.Parent.Text;//и так далее
end;
asmodey1 вне форума Ответить с цитированием
Старый 08.03.2011, 14:10   #5
firephenix
Пользователь
 
Регистрация: 14.02.2011
Сообщений: 89
По умолчанию

B ещё одно. Как узнать все индексы дочерних папок в выбраной.
firephenix вне форума Ответить с цитированием
Старый 08.03.2011, 15:32   #6
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

его метод GetFirstChild даст первый элемент
Ну и в цикле пока GetNextChild не даст nil
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Treeview Dgriz Помощь студентам 1 30.12.2010 00:38
TreeView Kugen Общие вопросы Delphi 2 13.12.2010 23:05
TreeView DB_User БД в Delphi 1 23.02.2010 19:09