Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Работа с TreeView, не могу разобратся 
:(
    Опции темы
Utu12
Дата 27.4.2010, 17:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 10
Регистрация: 22.4.2010

Репутация: нет
Всего: нет



Добавляю узел или потомка в дерево, хочу чтобы вместе с тем и добавлялся какой то текст, ну типа как в "менюшках" во многих прогах. Есть дерево: 
-1
  -1.1
  -2.2
  ...
-2
  -2.1
-3
  -3.1
  -3.2
  -3.3
Хочу что бы, например, при нажатии на 1.1 в мемо выводился текст, при нажатии на 3.1 - другой текст и т.д. Как так сделать? Ну посоветуйте что нибудь!
PM MAIL   Вверх
Демо
Дата 27.4.2010, 19:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 7
Всего: 50



Код

procedure TForm1.TreeView1Click(Sender: TObject);
begin
  Memo1.Lines.Add(TreeView1.Selected.Text);
end;




--------------------
    
PM MAIL ICQ Skype   Вверх
Utu12
Дата 29.4.2010, 09:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 10
Регистрация: 22.4.2010

Репутация: нет
Всего: нет



Подскажите как сделать так, например:
-Раздел 1 (при нажатии на этот узел в мемо выводиться много текста)
-Раздел 2 (другой текст) ну и т.д.
Как вот так привязать текст к дереву?
PM MAIL   Вверх
superVad
Дата 29.4.2010, 12:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 735
Регистрация: 6.4.2006
Где: Черкассы, Украина

Репутация: 7
Всего: 15



У нодов есть свойсво Data. Это указатель.
Можешь туда присвоить StringList с нужным текстом.
Node.Data := TStringList.Create(nil)

Или можно сразу создавать ноды через AddObject.
Items.AddObject(Text,TStringList.Create(nil))
PM MAIL   Вверх
Utu12
Дата 29.4.2010, 17:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 10
Регистрация: 22.4.2010

Репутация: нет
Всего: нет



Спасибо, разобрался smile
PM MAIL   Вверх
Sasha3110
  Дата 9.1.2012, 14:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 1
Регистрация: 9.1.2012

Репутация: нет
Всего: нет



Всем привет. smile 
Помогите пожалуйста. Мне надо чтобы при нажатие TreeView был какой нибудь процесс. Ну типа Delphi World в браузере открывался что нибудь. 
За ответ зарание спасибо.   smile      
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.0415 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.