Вниз
Скачать: CL | DM;

TTreeView с Check Boxes   Найти похожие ветки 

← →
Анна   (2010-01-18 14:22) [0]

Есть таблица с иерархической структурой, которую надо периодически инсертить и апдейтить.
Структура такая:
kod_level   name_level      reference_level   prim

1 Кодификаторы 0       NULL
2 Кодиф объект.. 1       NULL
3 Кодиф семейств  1       NULL
4 Кодиф синонимов  1       1
10 Кодиф субъек РФ 1       NULL
40 Справочники 0       NULL
41 Справочник вод 40       1
42 Справочник голот 40       1
43 Справочник игло 40       1
44 Справочник кал 40       NULL
57 Аналит инф стат 0       NULL
58 Пром стат 57       NULL
59 Основные кол 57       1

Решила сделать ввод новых ветвей и подветвей, а также редактирование старых ветвей через treeview. В таблице поле PRIM отвечает за визуальное состояние нижних ветвей, т.е. если "1"  - то эта ветка доступна для выбора пользователям (в другой прогамме).
Около  каждой нижней ветки сделала для этой цели чекбокс:
With TreeView1.Items.Item[5] do SetWindowLong(TreeView1.Items.Item[5].Handle,GWL_STYLE,GetWindowLong(TreeView1.I tems.Item[5].Handle,GWL_STYLE) or TVS_CHECKBOXES);

Чекбоксы появляются, но по всем веткам, т.е. и по верхним, с reference_level=0...
1. посоветуйте, пож-та, другой вариант, как сдалать insert или update   в    таблицу поля PRIM через дерево?
2. можно ли "прикрутить" чекбоксы к отдельным node ?
Заранее спасибо.


← →
Анна   (2010-01-18 15:19) [1]

:((


← →
MBo ©   (2010-01-18 15:48) [2]

Хм. Я думал, что установка стиля TVS_CHECKBOXES действует на дерево в целом...
Для отдельных узлов, наверно, проще картинки рисовать (через Imagelist)


← →
Анна   (2010-01-18 15:51) [3]


> MBo ©   (18.01.10 15:48) [2]

Да. Наверное так.


← →
HRustBB   (2010-01-18 23:10) [4]

может это поможет http://www.soft-gems.net/VirtualTreeview/



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.006 c
2-1263492244
lewka
2010-01-14 21:04
2010.03.21
Обращение к ТStringGrid на другой TForm


1-1244227891
andreil
2009-06-05 22:51
2010.03.21
Как создать ярлык в Дельфи 2009?


6-1214837103
Валентин
2008-06-30 18:45
2010.03.21
Эмуляция DHCP


15-1262640624
Юрий
2010-01-05 00:30
2010.03.21
С днем рождения ! 5 января 2010 вторник


15-1262278818
qaz
2009-12-31 20:00
2010.03.21
Новогодняя




   Наверх