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


         

Редактирование страницы свойств - часть 2


Combo2.Listlndex = SelectedControls(0).Effect

End Sub

Затем необходимо обновить переменную Changed из событий, обозначающих выбор нового значения из элемента управления ComboBox. Поскольку элементы ComboBox не позволяют вводить новые значения, то выбор может осуществляться только с использованием события Click. Значит, необходимо добавить обработчик события Click для элементов ComboBox, как показано ниже.

Private Sub Combol_Click()

Changed =

True

End Sub

Private Sub Combo2_Click ()

Changed = True

End Sub

На последнем шаге исправим обработчик события

ApplyChanges() так, чтобы он приводил в действие изменения в элементах ComboBox. Ниже приведен код, реализующий обработку щелчка на кнопке Apply.

Программа 16.13. Применение изменений

Private Sub PropertyPage_ApplyChanges()

SelectedControls(0).Caption = txtCaption.Text

SelectedControls(0).TextAlignment = Combol.Listlndex

SelectedControls(0).Effect = Combo2.Listlndex

End Sub

Теперь можно переключиться на тестовую форму и проверить работу страниц свойств. Как видите, страницы свойств не являются чем-то новым - это обычные формы VB, на которых можно помещать все виды элементов управления. При работе с этими страницами следует придерживаться нескольких правил, пред­лагаемых мастером.

1. Устанавливайте свойство Changed в значение True каждый раз, когда свойства меняют свое значение для разрешения использования кнопки Apply.

2. Модифицируйте свойства элементов управления, используя выражение Selec­tedControls (0) propertyName, где propertyName — фактическое имя свойства.

3. Инициализируйте свойства в событии PropertyPage_SelectionChanged() каждый раз, когда пользователь переключается на новую страницу свойств.

Если открыть окно свойств для объекта UserControl, то можно увидеть, что свойство PropertyPages имеет значение 4. Это указывает на то, что элемент управления имеет четыре страницы свойств. Для того чтобы исключить ненужные страницы свойств, вызовите диалоговое окно Connect Property Page, показанное на рис. 16.13 и очистите флажок перед соответствующим именем страницы свойств.




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