http://sfsys.ru/index.php?action=history&feed=atom&title=GI.CaptureMouse 2026-04-04T15:27:41Z Revision history for this page on the wiki MediaWiki 1.31.1 http://sfsys.ru/index.php?title=GI.CaptureMouse&diff=4833&oldid=prev 2025-01-22T06:53:39Z

<p>1 revision imported</p> <table class="diff diff-contentalign-left" data-mw="interface"> <tr class="diff-title" lang="en"> <td colspan="1" style="background-color: #fff; color: #222; text-align: center;">← Older revision</td> <td colspan="1" style="background-color: #fff; color: #222; text-align: center;">Revision as of 06:53, 22 January 2025</td> </tr><tr><td colspan="2" class="diff-notice" lang="en"><div class="mw-diff-empty">(No difference)</div> </td></tr></table>

Admin http://sfsys.ru/index.php?title=GI.CaptureMouse&diff=4832&oldid=prev 2025-01-18T07:06:08Z

<p>Created page with &quot;{{infobox function |name=CaptureMouse |object=<a href="/index.php/%D0%9E%D0%B1%D1%8A%D0%B5%D0%BA%D1%82_GI" title="Объект GI">Объект GI</a> |caption=Общие функции объекта GI |type=1 |status=2 |db=0 |visual=1}} {{HeadLinks| * Mai...&quot;</p> <p><b>New page</b></p><div>{{infobox function<br /> |name=CaptureMouse<br /> |object=[[Объект GI]]<br /> |caption=Общие функции объекта GI<br /> |type=1<br /> |status=2<br /> |db=0<br /> |visual=1}}<br /> {{HeadLinks|<br /> * [[Main_Page|Начальная страница]]<br /> * [[Общее_описание_языка|Общее описание]]<br /> * [[Объекты]]<br /> * [[Объект GI]]}}<br /> В зависимости от режима захвата мыши [[GI.MouseMode|MouseMode]], функция прячет курсор мыши, переносит ее положение в центр окна ''GI'', либо ничего не делает, если режим захвата выключен, либо захват уже был выполнен.<br /> <br /> == Синтаксис ==<br /> &lt;code&gt;<br /> {{Grey|GI.}}'''CaptureMouse'''()<br /> &lt;/code&gt;<br /> <br /> == Примеры ==<br /> &lt;pre&gt;<br /> <br /> //Событие движения мыши и нажатия на клавиши<br /> Function OnNewInput(aGI,СпУскор,ТипСобытия,Арг1,Арг2,Арг3,Арг4)<br /> If ТипСобытия=0 Then<br /> //Движение мыши -- обновить переменные поворота<br /> //Арг2, Арг3 -- смещение мыши по X и Y относительно окна прорисовки<br /> If aGI.MouseCaptured Then<br /> СпУскор[4]:=Арг2-aGI.Width div 2;<br /> СпУскор[5]:=Арг3-aGI.Height div 2;<br /> EndIf;<br /> ElseIf ТипСобытия=1 Then<br /> //Нажатие мыши на экран, захватить мышь<br /> aGI.CaptureMouse();<br /> ElseIf ТипСобытия=11 Then //Клавиша нажата<br /> If (Арг1=0x57)Or(Арг1=0x26) Then//W или стрелка вперед -- движение по Z<br /> СпУскор[3]:=1;<br /> ElseIf (Арг1=0x53)Or(Арг1=0x28) Then//S или стрелка назад -- движение по Z<br /> СпУскор[3]:=-1;<br /> ElseIf (Арг1=0x51)Or(Арг1=0x25) Then//Q или стрелка влево -- движение по X<br /> СпУскор[1]:=-1;<br /> ElseIf (Арг1=0x45)Or(Арг1=0x27) Then//E или стрелка вправо -- движение по X<br /> СпУскор[1]:=1;<br /> ElseIf (Арг1=0x20)Or(Арг1=0x41) Then//A или пробел -- прыжок<br /> СпУскор[2]:=1;<br /> ElseIf Арг1=0x1B Then//ESC -- отпустить мышь<br /> aGI.ReleaseMouse();<br /> EndIf;<br /> ElseIf ТипСобытия=12 Then //Клавиша отпущена<br /> If ((Арг1=0x57)Or(Арг1=0x26))And(СпУскор[3]=1) Then//Отменить движение по Z, если оно было инициировано W<br /> СпУскор[3]:=0;<br /> ElseIf ((Арг1=0x53)Or(Арг1=0x28))And(СпУскор[3]=-1) Then//Отменить движение по Z, если оно было инициировано S<br /> СпУскор[3]:=0;<br /> ElseIf ((Арг1=0x51)Or(Арг1=0x25))And(СпУскор[1]=-1) Then//Отменить движение по X, если оно было инициировано Q<br /> СпУскор[1]:=0;<br /> ElseIf ((Арг1=0x45)Or(Арг1=0x27))And(СпУскор[1]=1) Then//Отменить движение по X, если оно было инициировано E<br /> СпУскор[1]:=0;<br /> ElseIf _Or(Арг1=0x20,Арг1=0x41) Then//Отменить прыжок<br /> СпУскор[2]:=0;<br /> EndIf;<br /> ElseIf ТипСобытия=21 Then//Потеря фокуса окном, отпустить мышь<br /> aGI.ReleaseMouse();<br /> EndIf;<br /> EndFunction<br /> <br /> &lt;/pre&gt;</div>

1>Admin