.....На данном уроке мы с Вами создадим форму для справочника "Классификатор ОКП" на базе заготовки дочернего окна fmVLMDIChild, созданной на предыдущем уроке.
Шаг 5.1 - Создание inherit формы и предварительная ее настройка.
В главном меню среды Delphi выберите пункт File -> New -> Other... На экран будет загружено окно выбора нового типа объекта, как на рисунке 5.1. Перейдите на закладку PLMCommander (см. рис. 5.1).
Рис. 5.1
На указанной закладке будут представлены формы, разработанные в приложении. Встаньте на форму fmVLMDIChild и нажмите кнопку OK. Будет создана новая форма на основе указанной. Новая форма польностью повторит все описанные в fmVLMDIChild свойства и методы и позволит Вам добавить новые. В окне инспектора свойств формы настройте указанные ниже свойства следующим образом:
TForm.
Свойство |
Значение |
Комментарий |
Caption |
Классификатор ОКП |
Заголовок окна |
Height |
600 |
Высота окна по умолчанию |
Icon |
|
Установить иконку из файла LibOKP.ico из папки ..\Tutorial\Icon каталога установки библиотеки |
Name |
fmLibOKP |
Имя формы в модуле |
Width |
500 |
Ширина формы по умолчанию |
Остальные свойства можно оставить без изменений. Не забудьте удалить вновь созданную форму из списка загружаемых форм при загрузке приложения (см. Урок 2 рис. 2.4).
Учитывая то, что кнопки Сохранить и Закрыть нам в данном окне не нужны, настроим их свойства Visible в окне инспектора свойств как False. Кнопки отображаться на форме не будут. Сохраните модуль в файл с именем PCLibOKP.
Шаг 5.2 - Формирование дерева классификатора.
Установим на форму компонент - TVLTreeView из вкладки компонентов VisualLoodsman (см. рис. 5.2). Указанный компонент предназначен для отображения дерева объектов базы данных, связанных с головным объектом компонента указанной связью. Настройте некоторые свойства указанного компонента в инспекторе свойств следующим образом:
TVLTreeView.
Свойство |
Значение |
Комментарий |
Align |
alTop |
Выравнивание вдоль верхней части формы |
BDDCOM |
|
Указатель на DCOM соединение с базой данных системы ЛОЦМАН:PLM. Оставить не заполненным, будет заполнено программным путем. |
Filter |
|
Строка-фильтр просмотра подчиненных объектов дерева. Оставить незаполненной. |
HeadAttr |
Наименование |
Список собственных атрибутов головного объекта базы данных для данного компонента, которые будут отображаться при инициализации компонента. |
Height |
240 |
Высота компонента |
InBDID |
0 |
Целочисленный идентификатор объекта базы данных, который является головным для данного компонента. От данного объекта по указанной связи будет строится дерево объектов компонента при его инициализации. Оставить равным нулю, будет заполнено программным путем.
|
IndexFieldNames |
|
Список атрибутов объектов, по которым будут сортироваться подчиненные объекты при просмотре дерева. Оставить не заполненным. Сортировка будет производится по умолчанию. |
LinkName |
Состоит из ... |
Наименование связи, по которой будут отображаться объекты дерева. |
Name |
vltrv |
Имя компонента в приложении. |
VLAutoLoad |
True |
Параметр автозагрузки (автоинициализации) компонента. Параметр включен. |
Остальные свойства можно оставить без изменений.
Продолжение...