Метод Add (Добавить)
Позволяет добавить элемент управления во время исполнения программы. С его помощью можно добавить страницу в набор страниц, вкладку в полосу вкладок или любой элемент управления на страницу или диалоговое окно.
Вызов метода Add для вставки страницы или вкладки имеет вид:
Set Object = объект. Add ([Name [, Caption [, index]]])
Для добавления элемента управления к диалоговому окну или странице используется присвоение:
Set Control = объект. Add (ProgID [, Name [, Visible]])
Здесь объект - имя объекта (коллекции), к которому добавляется элемент, Name - задает имя (свойство Name) добавляемого объекта (если его нет, система присвоит добавленному элементу стандартное имя), Caption - задает заголовок страницы или вкладки, появляющийся на закладке, index - указывает положение страницы или вкладки в коллекциях Pages или Tabs, соответственно. ProgID - программный идентификатор добавляемого элемента, который представляет собой строку символов (без пробелов), идентифицирующую класс объектов. У этой строки структура обычно такова: <Поставщик>. <Компонента>. <Версия>. Программный идентификатор ProgID отображается на идентификатор класса (CLSID), т. е. на уникальный идентификатор (UUID), регистрируемый в системном реестре Windows. Необязательный булев параметр Visible указывает, виден ли объект на экране. По умолчанию он равен True (объект виден).
Вот значения программного идентификатора ProgID для стандартных элементов управления:
| флажок | Forms. CheckBox. 1 |
| комбинированный список | Forms. ComboBox. 1 |
| командная кнопка | Forms. CommandButton. 1 |
| рамка | Forms. Frame. 1 |
| изображение | Forms. Image. 1 |
| метка | Forms. Label. 1 |
| список | Forms. ListBox. 1 |
| набор страниц | Forms. MultiPage. 1 |
| переключатель | Forms. OptionButton. 1 |
| полоса прокрутки | Forms. ScrollBar. 1 |
| счетчик | Forms. SpinButton. 1 |
| полоса вкладок | Forms. TabStrip. 1 |
| поле ввода | Forms. TextBox. 1 |
| выключатель | Forms. ToggleButton. 1 |
Метод Add возвращает объект Page при вставке страницы в набор страниц и объект Tab при вставке вкладки в полосу вкладок.
В остальных случаях он возвращает объект из класса, определяемого значением ProgID. После добавления элемента управления возбуждается событие AddControl.
Давайте добавим элемент управления к окну во время работы программы. Допустим, диалоговое окно InsertElem содержит командную кнопку cmbNewCtrl "Добавить элемент" и группу из двух переключателей: Opb1 "поле ввода" и Opb2 "список":
Рис. 13. 8. Окно перед добавлением элемента
При выборе кнопки в окно будет вставляться в зависимости от того, какой из переключателей включен, либо два поля ввода с именами Text1 и Text2, первое из которых содержит приглашение "Введите имя", либо новый список NewList со списком имен.
Пример 13.1.
(html, txt)
Вот результаты выбора командной кнопки при разных значениях переключателей:
увеличить изображение
Рис. 13. 9. Результаты вставки элементов
