2. Метки и их свойства

Вы уже сделали несколько проектов с использованием такого элемента управления, как метка, и уже знаете, что метка (label) - это поле, заполняемое программистом текстовой информацией и недоступное пользователю для редактирования. Содержимое метки определяется значением ее свойства Caption. Прямой вывод текста или рисование на метке не допускается. Объекты типа “метка” обычно служат для отображения небольших блоков текста.

Метки обладают как стандартными свойствами, такими как Font Bold, Font Italic, Font Name, Font Size, Font Underline, Height, Left, Name, Top, Visible, Width, так и некоторыми другими, описанными ниже.

Alignment (выравнивание). Это свойство определяет, каким образом размещается название метки. По умолчанию свойство Alignment равно нулю, т.е. Left Justify, что выравнивает метку по левой границе. Прочие значения: 1 - Right Justify - выравнивание по правой границе и 2 - Center - выравнивание по центру.

Auto Size (автоподстройка размера). Если это свойство имеет значение True, размер поля метки автоматически подгоняется под размер текста, заданный свойством Caption. Если же свойство Auto Size соответствует False, метка сохраняет размер, установленный при проектировании, лишние символы длинного текста отсекаются.

Border Style (тип границ). Это свойство способно принимать всего два значения: 0 - контур поля метки отсутствует (устанавливается по умолчанию) и 1 - метка очерчивается одинарными линиями.

Enabled (доступ). Обычно равно True, а если присвоить False, текст метки поблекнет (станет серым) и обработка событий, связанных с действиями мышью, будет запрещена.

Объекты типа “метка” воспринимают события Click и DblClick так же, как и окна рисунков, изображений и формы.

2.1 Проект с prjFaces

Сделаем следующий проект. На форме с именем frmFaces поместим метку с именем lblStatement, элемент Image с именем imgFace и командную кнопку cmdExit для выхода из программы. Нарисуйте две картинки с изображением грустной и веселой рожицы в графическом редакторе и запишите эти два файла на диск. На метке сотрите текст по умолчанию, чтобы перед запуском проекта она была пуста. После запуска проекта на метке должна распечатываться информация приблизительно такого содержания:

Когда пользователь нажмет мышкой один раз на метке, то текст сообщения на ней изменится, и на элементе imgFace появится грустная физиономия. Это может выглядеть примерно вот так:

После двойного щелчка пользователем мышкой на метке картинка на элементе image должна смениться на другую.

Для того чтобы сделать такой проект, нужно обработать несколько событий. При загрузке формы нужно менять значение Caption метки. Составьте код для этого события:

Private Sub Form_Load( )

End Sub

В коде для события Click на метке lblStatement должно меняться значение свойства Caption метки lblStatement и с использованием функции Load Picture загружаться соответствующая картинка на объекте imgFace. Составте этот код.

Private Sub lblStatement_Click( )

End Sub

В коде для события DblClick на метке lblStatement должна с использованием функции Load Picture меняться картинка. Составьте этот код.

Private Sub lblStatement_DblClick( )

End Sub

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