|
|
Наступает при перемещении указателя мыши в клиентской области компонента.
Синтаксис
function OnMouseMove(
| Sender, | Shift, | X, | Y
| );
|
Параметры
|
Параметр
| Тип
| Описание
|
Sender
| TComponent
| дескриптор визуального компонента
|
Shift
| Enumset
| состояние управляющих клавиш (см. ниже)
|
X
| Number
| координата указателя мыши по оси абсцисс
|
Y
| Number
| координата указателя мыши по оси ординат
|
|
Параметр Shift
|
Значение
| Описание
|
ssAlt
| клавиша Alt
|
ssCtrl
| клавиша Ctrl
|
ssShift
| клавиша Shift
|
|
// Главная форма frm=new TForm(); frm.Caption="JS+ - событие визуальных компонентов OnMouseMove"; frm.Width =450; frm.Height=300; frm.OnMouseMove=frm_MouseMove;
// Строка состояния stb=new TStatusBar(frm); stb.SimpleText=" Двигайте левой кнопкой мыши в области формы";
frm.ShowModal();
// Обработчик события OnMouseMove function frm_MouseMove(frm,sft,x,y) { var tmp_Str=" Указатель мыши в точке: "+x+","+y;
if (sft & ssAlt) tmp_Str+=" + Alt"; if (sft & ssCtrl) tmp_Str+=" + Control"; if (sft & ssShift) tmp_Str+=" + Shift";
stb.SimpleText=tmp_Str; }
Совместимость
C++ Builder/Delphi
|
JS+ | Руководство пользователя
|
|
|
|
|
|