Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.23;
Скачать: CL | DM;

Вниз

Можно ли скреститьTreeView с Fields Editor   Найти похожие ветки 

 
Anarki ©   (2005-10-26 01:16) [0]

Доброго времени суток, мастера!
Хочу чтобы св-ва объектов, прилинкованных к узлам дерева, редактировались в инспекторе объектов типа как сделано в fields editor. Объекты могут быть порождены от одного класса.
Возможно ли это? Советуют использовать коллекции, но как я понимаю с помощью коллекций нельзя сделать иерархическую структуру как у дерева. Если я ошибаюсь, подскажите, пожалуйста, как.


 
Юрий Зотов ©   (2005-10-26 03:06) [1]

> Хочу чтобы св-ва объектов, прилинкованных к узлам дерева,
> редактировались в инспекторе объектов

1. Прилинкованный к узлу объект должен быть потомком TPersistent и у него должен быть замещен метод AssignTo.

2. Пишете свой класс узла (потомок TTreeNode). В конструкторе создаете прилинкованный объект, в деструкторе уничтожаете его (ссылка на объект хранится в приватном поле). Вводите published-свойство, дающее доступ к прилинкованному объекту (по чтению - напрямую к полю, по записи - через метод Set, в котором вызывается Assign).

3. В дереве замещаете метод CreateNode (или используете событие OnCreateNodeClass), чтобы создавались узлы Вашего класса.

> с помощью коллекций нельзя сделать иерархическую структуру

Ничто не мешает элементу коллекции содержать published-свойство, ссылающееся на такую же (или другую) коллекцию. Получим дерево.



Страницы: 1 вся ветка

Текущий архив: 2006.04.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.463 c
15-1143694495
Ega23
2006-03-30 08:54
2006.04.23
С Днём рождения! 30 марта


3-1141371911
DancerMan
2006-03-03 10:45
2006.04.23
*.dbf => функция смены кодировки => отобразить в гриде ?


2-1144747164
pavel_guzhanov
2006-04-11 13:19
2006.04.23
Как можно поменять местами строки в листбоксе?


3-1141198179
Sergg
2006-03-01 10:29
2006.04.23
Обновить счетчик в Акцессе


1-1142496507
Леван
2006-03-16 11:08
2006.04.23
Как найти в end, соответствующий begin-у