Перечислим основные общие методы элементов управления.
| Add | Позволяет добавить элемент управления во время выполнения программы |
| Move | Перемещает элемент управления |
| SetFocus | Устанавливает фокус на вызвавшем этот метод элементе управления. Часто применяется в программах обработки ошибок |
| Zorder | Помещает объект до или после всех пересекающихся с ним объектов |
Перечислим наиболее часто употребляемые общие события элементов управления.
| Click | Происходит, когда пользователь выбирает элемент управления с помощью одинарного щелчка кнопкой мыши |
| Dbici'ick | Происходит, когда пользователь выбирает элемент управления с помощью двойного щелчка кнопкой мыши |
| Keypress | Происходит, когда пользователь нажимает любую клавишу на клавиатуре, кроме функциональных и клавиш управления курсором |
| Change | Происходит при изменении значения элемента управления |
| GotFocus и LostFocus | Происходит, когда элемент управления получает или теряет фокус |
| Error | Используется при уведомлении об ошибке |
Рассмотрим синтаксис процедур обработки событий, генерируемых нажатием кнопки мыши и перемещением указателя мыши и связанных с элементами управления.
События, связанные с нажатием кнопки мыши и перемещением мыши
Событие Событие происходит
MouseDown При нажатии кнопки мыши
MouseUp При отпускании кнопки мыши
MouseMove При перемещении указателя мыши
Синтаксис:
Private Sub object_MouseDown(ByVal Button As fmButton, _
ByVal Shift As fmShiftState, ByVal X As Single, ByVal Y As Single)
Private Sub object_MouseUp (ByVal Button As fmButton, _
ByVal Shift As fmShiftState, ByVal X As Single, ByVal Y As Single)
Private Sub object_MouseMove(ByVal Button As fmButton,_
ByVal Shift As fmShiftState, ByVal X As Single, ByVal Y As Single)
Аргументы:
| Button | Возвращает код (значение) нажатой кнопки мыши. Допустимые значения: - fmButtonLeft или l (левая) -fmButtonRight ИЛИ 2 (правая) -fmButtonMiddle ИЛИ 4 (средняя) |
| Shift | Возвращает код (значение) нажатой на клавиатуре клавиши. Допустимые значения: fmShiftMask ИЛИ 1 (<Shift>) fmCtrlMask ИЛИ 2 (<Ctrl>) fmAltMask ИЛИ 4 (<Alt>). |
| X и Y | Возвращает значение расстояния от левого или от верхнего края формы, рамки или страницы. При событии MouseMove этим расстоянием считается путь в направлении от левого верхнего угла элемента управления по горизонтали или вертикали |
Рассмотрим синтаксис процедур обработки событий при операциях drag-and-drop, связанных с элементами управления.
События, связанные с перемещением элемента управления
Событие Событие происходит
BeforeDragOver Пока совершается операция drag-and-drop
BeforeDropOrPaste Перед завершением операции drag-and-drop
Синтаксис:
Private Sub object_BeforeDragOver(ByVal Cancel As _
MSForms.ReturnBoolean, ByVal Data As DataObject, _
ByVal X As Single, ByVal Y As Single, _
ByVal DragState As fmDragState, _
ByVal Effect As MSForms.ReturnEffect, _
ByVal Shift As fmShiftState)
Private Sub object_BeforeDropOrPaste(ByVal Cancel As _
MSForms.ReturnBoolean, ByVal Action As fmAction, _
ByVal Data As DataObject, ByVal X As Single, ByVal Y As Single, _
ByVal Effect As MSForms.ReturnEffect, _
ByVal Shift As fmShiftState)
Аргументы:
| Cancel | Допустимые значения: False (по умолчанию, элемент управления обрабатывает событие) и True (приложение обрабатывает событие) |
| Data | Данные, перемещаемые во время операции drag-and-drop. Эти данные размещаются в объекте DataObject. Объект DataObject это своеобразный аналог буфера обмена, в отличии от которого в нем допускается хранить только текстовую информацию |
| X и Y | Расстояние от левого верхнего угла элемента управления по горизонтали и вертикали |
| DragState | Устанавливает позицию указателя мыши относительно целевого объекта. Допустимые значения: fmDragStateEnter или 0 (указатель мыши внутри целевого элемента управления) fmDragStateLeave или 1 (указатель мыши вне целевого элемента управления) fmDragStateOver или 2 (указатель мыши в новой позиции, но остается внутри элемента управления) |
| Effect | Устанавливает операцию, производимую над объектом. Допустимые значения: - fmDropEffectNone или 0(не копировать и не перемещать объект) fmDropEffectCopy или 1 (копировать объект) fmDropEffectMove или 2 (перемещать объект) fmDropEffectCopyOrMove или 3 (копировать или перемещать объект) |
| Shift | Возвращает код (значение) нажатой на клавиатуре клавиши. Допустимые значения: -fmShiftMask ИЛИ 1 (<Shift>) -fmCtrlMask ИЛИ 2 (<Ctrl>) - fmAltMask ИЛИ 4 (<Alt>) |
