3. Добавляем рамку

Рамка поможет нам привлечь внимание к демонстрации. На панели компонентов выберите компонент Frame (Рамка), нарисуйте рамку справа от переключателей и измените свойство Caption (Заголовок) – введите слово Пример.

4. Добавляем демонстрационные объекты

Демонстрируемые элементы управления будем помещать внутри рамки. Они лягут стопкой друг на друга. При работе программы всегда будет виден только один элемент управления – тот, который связан с включенным переключателем. Действовать будем так:

• Выберите на панели компонентов кнопку CommandButton (Командная кнопка). Нарисуйте ее объект внутри рамки. Задайте для свойства Caption (Заголовок) значение Это кнопка.

• Выберите на панели компонентов флажок CheckBox (Флажок). Нарисуйте его объект внутри рамки. Ничего, если он ляжет прямо на кнопку. Задайте для свойства Caption (Заголовок) значение Это флажок. При работе флажок пока отображаться не должен – для свойства Visible (Видимый) задайте значение False (Нет).

• На панели компонентов выберите компонент ComboBox (Поле со списком). Нарисуйте и этот объект внутри рамки, посередине. Задайте для свойства Style (Стиль) значение 2 – Dropdown List (Раскрывающийся список). Щёлкните на свойстве List (Список) и введите три пункта списка: Это, Раскрывающийся и Список. Для создания нового пункта списка применяйте комбинацию клавиш CTRL + ENTER. Для свойства Visible (Видимый) так же задайте значение False (Нет).

• Выберите компонент VScrollBar (Вертикальная полоса прокрутки). Нарисуйте вертикальную полосу прокрутки в центре демонстрационной рамки. Немного измените ее настройку. Для свойства Max (Максимум) задайте значение 10, а для свойства LargeChange (Большое изменение) – значение 2. Не забудьте также задать значение False (Нет) для свойства Visible (Видимый).

• Выберите компонент TextBox (Текстовое поле). Создайте в центре рамки экземпляр этого компонента. Задайте для свойства Text (Текст) значение Это текстовое поле. Этот элемент управления надо также сделать невидимым, задав для свойства Visible (Видимый) значение False (Нет).

5. Программируем переключатели

Самое важное событие для переключателей – это включение (Click). Оно возникает при включении любого переключателя в группе, причём неважно, как это сделано: щелчком мыши или нажатием клавиш ENTER и ПРОБЕЛ. Процедура для обработки этого события вызывается также при нажатии курсорных клавиш.

Чтобы создать эту процедуру, дважды щелкните на любом из переключателей. У массива объектов процедура обработки всегда общая. Номер объекта в массиве передается в нее как параметр Index. В нашем случае параметр Index в процедуре Option1_Click показывает, какой переключатель был установлен. Отсчет идет с нулевого по четвертый переключатель.

Давайте запишем код и посмотрим, что у нас получится:

Command1.Visible = Index = 0

Все остальные операторы запишем точно так же:

Check1.Visible = Index = 1

Combo1.Visible = Index = 2

VScroll1.Visible = Index = 3

Text1.Visible = Index = 4

Запустите программу, нажав клавишу F5.

Для самостоятельной работы

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

На левой панели создайте пять переключателей: Азия, Африка, Европа, Северная Америка и Южная Америка. На средней панели поместите пять списков. Например, для Европы список может быть таким: Берлин, Лондон, Москва, Париж, Прага.

Подберите картинки с фотографиями различных городов и поместите их файлы в специально заготовленную папку, например С:\PHOTO.