| Свойство |
Значение |
Комментарий |
| TLabel |
| Caption |
Код ОКП: |
Надпись |
| Left |
208 |
Координата по горизонтали |
| Top |
8 |
Координата по вертикали |
| TEdit |
| Color |
clBtnFace |
Цвет компонента по умолчанию |
| Enable |
False |
Выключить доступ к компоненту по умолчанию |
| Hint |
Код ОКП для поиска |
Контекстная подсказка |
| Left |
264 |
Координата по горизонтали |
| Name |
edOKP |
Наименование компонента |
| ShowHint |
True |
Включить режим отображения контекстной подсказки |
| Top |
8 |
Координата по вертикали |
| Width |
81 |
Ширина компонента |
| TSpeedButton |
| Enable |
False |
Выключить доступ к компоненту по умолчанию. |
| Glyph |
TBitMap |
Установить на кнопку изображение из файла LibOKP.bmp из папки ..\Tutorial\Icon каталога установки библиотеки |
| Hint |
Просмотр классификатора ОКП |
Контекстная подсказка |
| Left |
344 |
Координата по горизонтали |
| Name |
sbtOKP |
Наименование компонента |
| ShowHint |
True |
Включить режим отображения контекстной подсказки |
| Top |
8 |
Координата по вертикали |
| TCheckBox |
| Caption |
включая код |
Надпись. |
| Hint |
Выключатель режима поиска по коду ОКП |
Контекстная подсказка |
| Left |
376 |
Координата по горизонтали |
| Name |
chbOKP |
Наименование компонента |
| ShowHint |
True |
Включить режим отображения контекстной подсказки |
| Top |
8 |
Координата по вертикали |
| Width |
89 |
Ширина компонента |
Остальные свойства компонентов можно оставить без изменений. Установите на форму компонент
- TVLFindTableView, как показано на рисунке 8.2. Настройте в инспекторе свойств некоторые свойства данного компонента следующим образом:
TVLFindTableView.
| Свойство |
Значение |
Комментарий |
| Anchors |
[akLeft,akTop,akRight, akBottom] |
Привязки к краям формы |
| BDDCOM |
|
Указатель на DCOM соединение с базой данных системы ЛОЦМАН:PLM. Оставить поле пустым, будет заполнено программным путем. |
| Height |
420 |
Высота компонента |
| Hint |
Таблица поиска деталей в базе данных |
Контекстная подсказка |
| Left |
0 |
Координата по горизонтали |
| Name |
vlftv |
Наименование компонента |
| ShowHint |
True |
Включить режим отображения контекстной подсказки |
| stAttrCondition |
|
Условие поиска по атрибутам, оставить пустым, будет заполняться программным путем. |
| stProductName |
|
Условие поиска по ключевому атрибуту, оставить пустым, будет заполняться программным путем. |
| stStateName |
|
Условие поиска по состоянию объекта, оставить пустым. |
| stTypeName |
Деталь |
Условие поиска по типам объектов, компонент будет осуществлять поиск только объектов типа "Деталь". |
| Top |
32 |
Координата по вертикали |
| VLAutoLoad |
False |
Выключить режим автозагрузки |
| Width |
472 |
Ширина компонента |
Остальные свойства компонента можно оставить без изменений. Невизуальные компоненты, указанные на рисунке 8.2 установим на форму и настроим позднее. Щелкните дважды левой кнопкой мыши по компоненту vlftv - TVLFindTableView, для вызова редактора колонок (см. рис. 8.3).

Рис. 8.3.
Выключите отображение системных колонок _TYPE и _PRODUCT (переведите значение свойства Visible в состояние False). Добавьте три дополнительные колонки (TColumn). Настройте в инспекторе свойств некоторые свойства новых колонок следующим образом.
| Свойство |
Значение |
Комментарий |
| TColumn |
| FieldName |
Обозначение |
Имя отображаемого атрибута в колонке. Если при редактировании свойства на экран будет загружено предупреждение - "Missing data provider or data packet" - не обращайте на него внимание, нажмите кнопку ОК и продолжайте заполнять свойство. |
| Title.Caption |
Обозначение |
Заголовок колонки. |
| Width |
100 |
Ширина колокни. |
| TColumn |
| FieldName |
Наименование |
Имя отображаемого атрибута в колонке. |
| Title.Caption |
Наименование |
Заголовок колонки. |
| Width |
200 |
Ширина колокни. |
| .TColumn |
| FieldName |
Масса 1 шт |
Имя отображаемого атрибута в колонке. |
| Title.Caption |
Масса 1 шт, кг |
Заголовок колонки. |
| Width |
80 |
Ширина колокни. |
Колонки будут отображаться как на рисунке 8.2. Далее...