Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TTreeView с Check Boxes

Анна © (2010-01-18 14:22:00)
Есть таблица с иерархической структурой, которую надо периодически инсертить и апдейтить.
Структура такая:
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 ?
Заранее спасибо.

HRustBB (2010-01-18 23:10:00) [1]
может это поможет http://www.soft-gems.net/VirtualTreeview/

Анна (2010-01-18 15:51:00) [2]

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

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

MBo (2010-01-18 15:48:00) [3]
Хм. Я думал, что установка стиля TVS_CHECKBOXES действует на дерево в целом...
Для отдельных узлов, наверно, проще картинки рисовать (через Imagelist)

Анна (2010-01-18 15:19:00) [4]
:((

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »