Основные свойства формы их значения и описание

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

Операторы, методы и события работы с формой

При работе с формой в приложении, возможно использование самых разнообразных текстовых и графических методов.

Текстовые и графические методы формы

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

Для добавления кнопки на форму используется элемент управления Command Button, который имеется в стандартном комплекте панели ToolBox. Затем для нее описываются все необходимые свойства, в частности, расположение на экране, видимость, внешний вид и т. д. - аналогично приведенным выше свойствам формы. Однако управляющие кнопки имеют также другие свойства, которые отсутствуют у форм.

Отличительные свойства элемента Command Button

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

Событие Click также происходит при нажатии клавиши Enter или Пробел,но при этом необходимо, чтобы кнопка имела фокус. В дополнение к сказанному следует отметить что нажатие клавиши Esc эквивалентно событию Click для той кнопки у которой значение свойства Cancel = True, при этом местонахождение фокуса не имеет значения.

При запуске приложения, как правило, один из имеющихся на форме объектов должен быть активным, то есть обрабатывать определенным образом информацию, получаемую от мыши или клавиатуры В этом случае говорят, что данный объект имеет фокус. Например, если на форме находится две управляющие кнопки и одна из них имеет фокус, то нажатие клавиши Enter (или Пробел) приводит к вызову для нее процедуры обработки события Click.

Если управляющая кнопка имеет фокус, то она отображается с выделенной рамкой на форме. В том случае, когда объект получает фокус, для него выполняется событие GotFocus. С другой стороны, при потере фокуса объектом происходит событие LostFocus.. Получение фокуса объектом может быть реализовано несколькими способами:

• а) При щелчке на нем мышью.
• б) Используя клавиши перехода, а именно Таb или стрелки управления курсором.
• в) Применяемая клавиши доступна.
• г) Выполняя для заданного объекта метод SetFocus.

Однако следует отметить, что объект не может получить фокус, если у него свойство Visible = False т.е. если он невидим на экране. К аналогичным последствиям приведет и свойство Enabled с тем же значением, т.е. если объект не может отвечать на действия, выполняемые пользователем при работе приложения.

Существует несколько элементов управления, которые не могут получить фокус:
Label(метка), Frame (рамка), Image (изображение). Line (линия) и Shape(Фигура).
К ним также относятся и те элементы, которые не отображаются на форме при выполнении программы, в частности,Common Dialog (стандартный диалог) или Timer (часы).

Как было отмечено выше, объект может подучить фокус с помощью клавиши Таb. Однако при этом он должен находиться в последовательности перехода для данной формы, т.е. среди тех элементов, которые могут получить фокус.

Для определения порядка перехода, в соответствии с которым объекты будут получать фокус при последовательных нажатиях клавиши Tab а также для исключения элемента из последовательности используются свойства Tablndex (порядковый номер для перехода) и TabStop (отсутствие в последовательности).

Объекту, который на форме был создан первым, автоматически устанавливается значение свойства Tablndex=0. Соответственно, каждый последующий элемент получает номер в последовательности на единицу больше. Однако это не относится к тем объектам, которые не могут получить фокус. Для изменения порядка перехода необходимо изменить для определенных объектов значения их свойства Tablndex соответствующим образом.

Если создаваемый на форме элемент может получить фокус, то его свойству TabStop по умолчанию устанавливается значение Тгue. В этом случае, если объект необходимо исключить из последовательности перехода, то для него необходимо установить свойство TabStop = False. Данное действие может быть выполнено как на этапе разработки, так и в программном коде.

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

Для описания такой клавиши необходимо в названии заголовка элемента (свойство Caption) поставить знак & перед одним из символов, после чего на кнопке он будет изображен с подчеркиванием. Событие Click в этом случае возникает для элемента при нажатии сочетания клавиш Alt-символ.

Пример.

Создание формы с тремя кнопками: "1", "2". "3".

При нажатии одной из них о произошедшем событии выводится надпись, например: "Кнопка: 1". Помимо этого, возможен доступ при помощи быстрых клавиш: Аlt-1, Аlt-2, Аlt-З соответственно. Последовательность доступа задается в порядке, обратном нумерации, т.е. "3", "2", "1". Другими словами, при загрузке формы фокус будет у кнопки "3".

Элементы управления и их свойства в приложении "Кнопки"

Использование кнопок управления и фокуса

Option Explicit Private Sub cmdl_Click() Call WriteCaption(1) End Slab Private Sub cmd2_Cliek() Call WriteCaption(2) End Sub Private Sub cmd3_Click () Call WriteCaption(3) End Sub Private Sub WriteCaption (Index As Byte) lblMessage. Caption = "Кнопка" & Index End Sub
При работе с текстом на форме, используются следующие элементы управления: Label и ТехtВох. Label (Метка). Применяется для отображения текста на форме, при этом его редактирование невозможно. Метки используются для визуальной подсказки пользователю о функциональном назначении того или иного элемента на форме. Свойства, используемые при работе с метками, приведены в таблице 2.31.

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

Если необходимо расположить текст в метке на нескольких строках с автоматическим увеличением ее высоты, следует разрешить перенос слов путем присвоения World Wrap = True. При этом следует отметить, что перенос слов, установленный таким образом, будет действовать только в том случае, если установлено свойство AutoSize = True.

ТехtВох (Текстовое поле). Используется для реализации диалога с пользователем путем ввода им с клавиатуры определенной информации. Так как у элемента ТехВох отсутствует свойство Caption, то в качестве его замены используют метку с соответствующим текстом.

Основные свойства элемента ТехtBох

Текст, который вводится пользователем, обрабатывается с помощью свойства Техt. Если он не помещается в заданных границах текстового поля, можно разрешить перенос слов путем установки свойства MultiLine = Тгuе. Вместе с этим необходимо выбрать один из вариантов для полос прокрутки текста (свойство ScrollBars), так как размеров поля может не хватить для отображения всей введенной информации.

Также можно установить тип выравнивания текста при помощи свойства Alignment (аналогично элементу Label), которое, однако, будет выполнено только в случае указанного выше присвоения MultiLine = True.
Для того чтобы при получении фокуса текстовым полем курсор находился в заданной позиции (по умолчанию - в начале текста), используется свойство SelStart - позиция.

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

Print (см. рис. 2.79). Используется при необходимости установления пользователем параметров печати, в частности, названия и свойств принтера, размера бумаги, ее ориентации (книжная или альбомная), диапазона выводимых на печать.
Необходимо помнить, что диалоговое окно Print не участвует в отправлении данных на принтер, а только задает параметры для печати. Поэтому, при необходимости вывести на печать информацию, следует наряду с использованием данного диалога также описать процедуру, которая будет непосредственно посылать данные принтеру.

Обработка событий мыши и клавиатуры

При работе любого приложения возникают различные события от мыши и клавиатуры, для которых в программе можно предусмотреть процедуры обработки. События клавиатуры возникают в том случае, когда пользователь нажимает какую-либо клавишу, а события мыши инициируются, если нажать/отпустить одну из ее кнопок, переместить указатель и т.д.

Обработка воздействий мыши состоит из следующих основных разделов:
1. События и состояние кнопок мыши.
2. Перетаскивание мышью различных элементов.
Следует отметить, что существует два часто обрабатываемых события мыпш, возникающие при использовании левой кнопки:

С1iск - происходит при щелчке на элементе;
DblClick - происходит в случае двойного щелчка.
Для некоторых элементов управления, таких как Label или Image, приведенные события инициируютея при нажатии как левой, так и правой кнопок. События и состояние кнопок мыши. В том случае, когда при работе приложения нажимается или отпускается одна из кнопок мыши, а также если ее указатель перемещается, то возникают следующие события:

MouseDown - нажата любая кнопка;
Mouseup - отпущена любая нажатая кнопка;
MouseMove - указатель мыши переместился
Перечисленные события могут распознаваться элементом управления, расположенным на форме, только в том случае, если указатель мыши находится непосредственно на нем.

Событие KeyPress различает выбор символа принадлежащего любой из приведенных категорий, а также нажатие клавиш Enter, Backspace, Tab.
События, возникающие при работе с клавиатурой

Если необходимо определить, была ли нажата одна из функциональных клавиш, вспомогательных (Shift, Ctrl,Alt), либо из клавиш управления курсором, то в этом случае необходимо обрабатывать события более низкого уровня: KeyDown и Key Up.При этом необходимо заметить, что эта пара событий и KeyPress не являются заменяемыми, т.е. при нажатии, например, функциональной клавиши, вначале возникают KeyDown и KeyPress (именно в таком порядке), а затем при ее отпускании выполняется KeyUp.

Процедура обработки события KeyPress имеет один параметр: KeyAscii As Integer, который представляет собой код из таблицы символов ASCII, соответствующий нажатой клавише. При обработке кодов можно вместо числовых значений использовать константы Visual Basic, полный перечень которых можно найти в разделе KeyCodeConstants окна Object Browser.

При возникновении событий KeyDown и KeyUp, в соответствующие процедуры передаются следующие параметры:
KeyCode As Integer - аналог KeyAscii, описанного выше, однако в данном случае наличие верхнего или нижнего регистра передается через параметр Shift;
Shift As Integer - идентифицирует нажатие вспомогательных клавиш (Shift, Ctrl или Alt)

Работа с графикой

Включение изображений в форму.

Для графического оформления в форме можно использовать элементы управления Image и PictureBox. Первый из них служит просто для размещения графического изображения в форме. Второй элемент представляет собой скорее окно с рисунком, то есть он может служить и для размещения других объектов, а не только этого рисунка.

Оба элемента включаются в форму стандартным образом. Необходимо, либо выполнить двойной щелчок на соответствующем элементе, либо выделив его пиктограмму, нарисовать элемент в форме при помощи мыши.
Их свойство Borderstyle имеет различное значение по умолчанию. Для элемента PictureBox устанавливается значение 1 - Fixed Single, а для элемента Image - значение 0 -None. Этим объясняется значительное различие во внешнем виде этих элементов.

Элементы управления Image и PictureBox в форме.

Элементы типа PictureBox имеют свойство Autosize, позволяющее привести в соответствие размеры изображения и самого элемента управления. Для этого свойство должно иметь значение Тгuе. По умолчанию принимается значение False. Если пренебречь установкой этого свойства, то может оказаться, что часть изображения скрыта от обозрения,так как размер изображения задан слишком маленьким.

Создание пользовательской кнопки.

Свойство Picture, которое имеется у изображения, можно применить для создания пользовательской командной кнопки, которая по своим возможностям будет аналогична стандартной кнопке, создаваемой при помощи элемента управления CommandButton. Такой графической кнопке можно легко придать желаемый внешний вид.

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

Объекты с именами imgWhite и imgBlack служат для установки изображения на графической кнопке в зависимости от того, нажата она или нет.
Следующий листинг содержит процедуры, реализующие графические кнопки программно. Для этого использованы события MouseDown H MouseUp. Три кнопки имеют имена imgFirst, imgSecond и imgThird.Так как объекты imgWhite и imgBlack служат только для хранения изображений нажатой и не нажатой кнопок, то они сделаны невидимыми посредством свойства Visible, которое имеет значение False.

Private Sub Form_Load() imgFirst.Picture = imgBlack.Picture imgSecond. Picture = imgBlack. Picture imgThird. Picture = imgBlack. Picture imgWhite.Visible = False imgBlack.Visible = False End Sub Private Sub imgFirst_MouseDown(Button As Integer, Shift As Integer, X _ As Single, Y As Single) imgFirst.Picture = imgWhite.Picture End Sub Private Sub imgFirst_MouseUp(Button _ As Integer, Shift As Integer, X As Single, Y As Single) imgFirst.Picture = imgBlack.Picture End Sub Private Sub imgSecond_MouseDown(Button As Integer, Shift As Integer, X _ As Single, Y As Single) imgSecond.Picture = imgWhite.Picture End Sub Private Sub imgSecond_MouseUp(Button As Integer, Shift As Integer, X i As Single, Y As Single) imgSecond.Picture = imgBlack.Picture End Slab Private Sub imgThird_MouseDown(Button As Integer, Shift As Integer, X _ As Single, Y As Single) imgThird.Picture = imgWhite.Picture End Sub Private Sub imgThird_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) imgThird.Picture = imgBlack.Picture End Sub <br>

Основная задача при разработке пользовательской кнопки заключается в том, чтобы элемент управления Image реагировал на события MouseDown и MouseUp аналогично обычной командной кнопке. Эту функцию и выполняет код, приведенный выше. Естественно, для того чтобы по нажатию кнопки выполнялось определенное действие, необходимо запрограммировать событие Click для соответствующего элемента Image.

Функция LoadPicture(). Часто возникает ситуация, когда изображение для элемента управления PictureBox и Image необходимо загрузить из файла, находящегося на диске. Этой цели служит функция LoadPicture().

Формат ее вызова: Pict = LoadPicture(Path), где Pict - переменная для хранения рисунка; Path - строковая переменная, содержащая путь к графическому файлу на диске. Например, следующая строка ставит в соответствие объекту picNew стандартный рисунок Windows circles.bmp: picNew.Picture = LoadPic-ture("c:\windows\circles.bmp")

Изменение пропорций и размеров рисунка.
Элемент управления Image имеет свойство Stretch. Будучи установленным равным Тгuе, это свойство позволяет менять пропорции рисунка.В рассматриваемом ниже примере форма включает два графических элемента управления.

Элемент picMain (Picture-Box) содержит рисунок с нормальными пропорциями, а элемент imgDistort (Image - рисунок, увеличенный по ширине в полтора раза. Для того чтобы размеры элемента управления PictureBox настраивались в соответствии с размерами назначенного ему рисунка, его свойство Autosize должно иметь значение Тгuе.

Содержание процедуры, которая позволяет изменить ширину рисунка по нажатию кнопки cmdChange.
Private Sub cmdChange__Click () imgDistort.Width = picMain. Width * 1.5 imgDistort. Height = picMain. Height imgDistort.Picture - picMain.Picture End Sub

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