Свойство |
Значение |
Комментарий |
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. Далее...