.....На данном уроке мы научимся создавать специальные процедуры управления объектами базы данных системы ЛОЦМАН:PLM для компонента vlftv - TVLFindTableView формы fmPCFindDetails (см. Урок 8). Будут созданы процедуры удаления объекта из базы данных, администрирования объекта (назначение уровней доступа к выделенному в таблице объекту), просмотра информации об авторе-создателе объекта, а также процедура изменения текущего состояния объекта. Создание указанных выше процедур во многом аналогично созданию аналогичных процедур для компонента TVLTableView (см. Урок 7). Единственное отличие только в работе процедуры удаления объекта из базы данных системы ЛОЦМАН:PLM (см.ниже). Процедура вызова окна редактирования выделенного в таблице поиска объекта базы данных будет рассмотрена в одном из следующих уроков.
Шаг 10.1 - Дополнение списка иконок для контекстного меню.
Встаньте на форму fmPCFindDetails и дважды щелкните на компоненте 
iml - TImageList. Будет загружен редактор списка иконок, как показано на рисунке 10.1.
Рис. 10.1.
Добавьте в список иконки из файлов Open.BMP, Delete.BMP, AdminObj.BMP, AuthorObj.BMP и ChangeState.BMP, которые находятся в папке ..\Tutorial\Icon каталога установки библиотеки (см. рис. 10.1).
Шаг 10.2 - Регистрация новых процедур.
Дважды щелкните на компоненте 
am (TActionManager) формы fmPCFindDetails, на экран загрузится редактор менеджера действий (см. рис. 10.2).
Рис. 10.2.
Создайте пять новых действия (TAction). В окне инспектора свойств настройте некоторые свойства компонентов следующим образом:
| Свойство |
Значение |
Комментарий |
| TAction - Открыть |
| Caption |
Открыть |
Заголовок действия |
| Hint |
Открыть выделенный в таблице объект в отдельном окне для редактирования |
Контекстная подсказка |
| ImageIndex |
0 |
Номер иконки в списке iml (нумерация начинается с 0) |
| Name |
OpenObj |
Имя действия в модуле |
| TAction - Удалить |
| Caption |
Удалить |
Заголовок действия |
| Hint |
Удалить выделенный в таблице объект из базы данных |
Контекстная подсказка |
| ImageIndex |
1 |
Номер иконки в списке iml (нумерация начинается с 0) |
| Name |
DelObj |
Имя действия в модуле |
| TAction - Администрирование... |
| Caption |
Администрирование... |
Заголовок действия |
| Hint |
Назначение уровней доступа к объекту |
Контекстная подсказка |
| ImageIndex |
2 |
Номер иконки в списке iml (нумерация начинается с 0) |
| Name |
AdminObj |
Имя действия в модуле |
| TAction - Автор-создатель... |
| Caption |
Автор-создатель... |
Заголовок действия |
| Hint |
Просмотр информации об авторе-создателе объекта |
Контекстная подсказка |
| ImageIndex |
3 |
Номер иконки в списке iml (нумерация начинается с 0) |
| Name |
AuthorObj |
Имя действия в модуле |
| TAction - Изменить состояние... |
| Caption |
Изменить состояние... |
Заголовок действия |
| Hint |
Изменить состояние выделенного объекта |
Контекстная подсказка |
| ImageIndex |
4 |
Номер иконки в списке iml (нумерация начинается с 0) |
| Name |
ChangeState |
Имя действия в модуле |
Настроенные таким образом действия будут отображаться в окне редактора так, как показано на рисунке 10.2.
Далее...
