Работа с фокусом

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

В том случае, когда объект получает фокус, для него выполняется событие GotFocus, при потере фокуса объектом происходит событие LostFocus.

Получение фокуса объектом может быть реализовано несколькими способами:

При щелчке на нем мышью.

Используя клавиши перехода, а именно: Tab или стрелки управления курсором.

Применяя клавишу доступа.

Выполняя для заданного объекта метод SetFocus.

Объект не может получить фокус, если у него свойства Visible=False или

Enabled = False.

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

Для определения порядка перехода, в соответствии с которым объекты будут получать фокус при последовательном нажатии клавиши Tab, используется свойство TabIndex(порядковый номер для перехода) и TabStop(отсутствие в последовательности). Объекту, который на форме был создан первым, автоматически присваивается значение свойства TabIndex=0, каждый последующий получает номер в последовательности на единицу больше. Порядок можно поменять, изменив значение свойства TabIndex.

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

Работа с буфером обмена в vb

Доступ к буферу обмена можно получить через объект Clipboard, для которого определены следующие методы:

• SetText записывает копию выделенного текста в буфер обмена;

• GetText () возвращает копию текстового содержимого буфера обмена;

• SetData записывает копию выделенного рисунка в буфер обмена;

• Get Data () возвращает содержимое (рисунок) буфера обмена;

• GetFormat () определяет, является ли содержимое буфера обмена текстом или рисунком;

• Clear очищает содержимое буфера обмена.

Работа с мышью

Обработка воздействий мыши состоит из следующих разделов:

1. События и состояние кнопок мыши.

2. Перетаскивание мышью различных предметов.

При использовании левой кнопки возникают события: Click – при щелчке на элементе;

DblClick – в случае двойного щелчка. Для элементов управления Label и Image приведенные события инициируются при нажатии как левой, так и правой кнопок..

В том случае, когда при работе приложения нажимается или отпускается одна из кнопок, а также если ее указатель перемещается, возникают следующие события:

MouseDown – нажата любая кнопка;

MouseUp – отпущена любая нажатая кнопка;

MouseMove – указатель мыши переместился.

В каждую из процедур обраьотки событий мыши передаются следующие параметры:

Button As Integer – определяет состояние кнопок мыши;

Shift As Integer – содержит информацию о нажатии клавиш Alt, Shift, Ctrl;

X As Single, Y As Single – возвращают координаты указателя мыши относительно системы отсчета того элемента, для которого возникло данное событие.

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

Представление		Константа	Нажатые кнопки
двоичное	десятичное
000	0		Нет
001	1	vbLeftButton	Левая
010	2	vbRightButton	Правая
100	4	vbMiddleButton	Средняя

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

Представление		Константа	Нажатые кнопки
двоичное	десятичное
000	0		Нет
001	1	vbShiftMask	Shift
010	2	vbCtrlMask	Ctrl
100	4	vbAltMask	Alt