Visual Basic 6. Руководство разработчика



         

Доработанный элемент управления - часть 4


После нажатия на кнопку Next отобразится следующее окно Create Custom Interface Members (Создание специальных частей интерфейса). Здесь нужно добавить следующие специальные компоненты.

EnterFocusColor.

Цвет фона элемента управления, когда он получает фокус.

LeaveFocusColor.

Цвет фона элемента управления, когда он теряет фокус.

Mandatory. Если это свойство имеет значение True, цвет фона элемента управления равен значению свойства MandatoryColor, чтобы показать, что элемент управления используется для требуемого поля.

MandatoryColor.

Цвет фона элемента управления, у которого свойство Mandatory равно True.

В следующем окне мастера отображаются все компоненты, за исключением специальных, соответствующих свойствам элемента управления

TextBoxl. Ни один из компонентов элемента управления CTextBox не отображается на объект UserControl просто потому, что TextBox полностью включает в себя весь объект UserControl.

В следующем окне Set Attributes задайте значения специальных свойств. Введите атрибуты, показанные в табл. 16.4, в соответствующие поля окна Set Attributes мастера.

Таблица 16.4. Значения специальных свойств

Свойство

Тип данных

Значение по умолчанию

В режиме выполнения

В режиме конструирования

EnterFocusColor LeaveFocusColor Mandatory MandatoryColor

OLECOLOR OLECOLOR Boolean OLECOLOR

&HOOFFFF &HFFFFFF False &HFFOOOO

Чтение/Запись Чтение/Запись Чтение/Запись Чтение/Запись

Чтение/Запись Чтение/Запись Чтение/Запись Чтение/Запись

В том же окне можно также ввести описание каждого свойства, которое появ­ляется в окне Properties, когда выбрано соответствующее свойство. После щелчка мышью на кнопке Next, а затем на кнопке Finish будет сгенерирован код элемента управления.

Теперь можно открыть окно Code объекта UserControl и просмотреть код, сгенерированный мастером. Следующие переменные и начальные значения распо­ложены в верхней части окна Code:

' Значения свойств, устанавливаемые по умолчанию:

Const m_def_Mandatory =




Содержание  Назад  Вперед