GI.MouseCaptured
| MouseCaptured (Общие функции объекта GI) | |||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||
Атрибут отдает 1, если мышь захвачена в данный момент и 0 в другом случае. См. также MouseMode.
Синтаксис
GI.MouseCaptured:<Захвачена ли мышь (INT)>
Возвращаемое значение
Атрибут возвращает целое число.
Примеры
//Событие движения мыши и нажатия на клавиши
Function OnNewInput(aGI,СпУскор,ТипСобытия,Арг1,Арг2,Арг3,Арг4)
If ТипСобытия=0 Then
If aGI.MouseCaptured Then
СпУскор[4]:=Арг2-aGI.Width div 2;
СпУскор[5]:=Арг3-aGI.Height div 2;
EndIf;
ElseIf ТипСобытия=1 Then
aGI.CaptureMouse();
ElseIf ТипСобытия=11 Then
If (Арг1=0x57)Or(Арг1=0x26) Then//W
СпУскор[3]:=1;
ElseIf (Арг1=0x53)Or(Арг1=0x28) Then//S
СпУскор[3]:=-1;
ElseIf (Арг1=0x51)Or(Арг1=0x25) Then//Q
СпУскор[1]:=-1;
ElseIf (Арг1=0x45)Or(Арг1=0x27) Then//E
СпУскор[1]:=1;
ElseIf (Арг1=0x20)Or(Арг1=0x41) Then//A
СпУскор[2]:=1;
ElseIf Арг1=0x1B Then//ESC
aGI.ReleaseMouse();
EndIf;
ElseIf ТипСобытия=12 Then
If ((Арг1=0x57)Or(Арг1=0x26))And(СпУскор[3]=1) Then//W
СпУскор[3]:=0;
ElseIf ((Арг1=0x53)Or(Арг1=0x28))And(СпУскор[3]=-1) Then//S
СпУскор[3]:=0;
ElseIf ((Арг1=0x51)Or(Арг1=0x25))And(СпУскор[1]=-1) Then//Q
СпУскор[1]:=0;
ElseIf ((Арг1=0x45)Or(Арг1=0x27))And(СпУскор[1]=1) Then//E
СпУскор[1]:=0;
ElseIf _Or(Арг1=0x20,Арг1=0x41) Then//A
СпУскор[2]:=0;
EndIf;
ElseIf ТипСобытия=21 Then//focus off
aGI.ReleaseMouse();
EndIf;
EndFunction