Go to most recent revision | Blame | Last modification | View Log | RSS feed
# :ð k¹â6×0ù DXInput <pDelphiXcfg.inch½ö(pDXInput.pasi½ö( dSystem gTObject.SafeCallException²
ÄgTObject.AfterConstruction³
ÄgTObject.BeforeDestruction´
ÄgTObject.Dispatchµ
ÄgTObject.DefaultHandler¶
ÄgTObject.NewInstance·
ÄgTObject.FreeInstance¸
ÄgTObject.Destroy¹
ÄfTObject|ê®ìfInteger fÂg.TObject_¾>f
AnsiString¶+{fBooleanúefTGUIDuÀ~fstring¶+{g@AbstractErroré`pÅgSizeOf gFillChar g @FillChar$gLow gHigh gExit gInc gOrd g@BeforeDestructionºS«g @ClassDestroyüÅàg
@IntfClear-¸\gTObject.Create¡
Äg@ClassCreateçVÃg@LStrAsgÔg@AsClassEÞTÒg@AfterConstructionKgTObject.Free¢
Äg@IsClass¡g@HandleFinallyé`pÅgCopy g @LStrCopyé`pÅg LoadResString[WbgMaxIntBdÕg @LStrLAsgÔg@RaiseExcepté`pÅg @LStrArrayClrüg@LStrClr\ª«>gBreak g@LStrCmpé`pÅgTrunc gSqrt/ `Bg@TRUNCé`pÅfPointerïfHRESULT[ìÀgTruevÉøgFalsesÉøg@IntfAddRefëéfByteµág @SetUnioné`pÅfPGUID3Ýig@TryFinallyExité`pÅg @IntfCastk@Ò¨g@HandleAnyExceptioné`pÅg@RaiseAgainé`pÅg@DoneExcepté`pÅgAbs fIUnknownJXÓþg @IntfCopy>¦y¼gDec cdSysInit g HInstanceW6ûKcdWindows fDWORDIÐáKfTPointçØfTKeyboardStateyógVK_UP~ç1g
VK_NUMPAD8ä~ç1gVK_DOWN$~ç1g
VK_NUMPAD2Ò~ç1gVK_LEFT~ç1g
VK_NUMPAD4Ø~ç1gVK_RIGHT!~ç1g
VK_NUMPAD6Þ~ç1gVK_SPACE~ç1g VK_RETURNÓ}ç1gVK_F2ÿ~ç1g
VK_NUMPAD0Ì~ç1g
VK_NUMPAD5Û~ç1gINFINITE¿yßÞgGetForegroundWindowñöãg VK_ESCAPEý}ç1gVK_BACKÄ}ç1gVK_TABÇ}ç1g
VK_CONTROLß}ç1gVK_SHIFTÜ}ç1gVK_MENUâ}ç1g
VK_CAPITALè}ç1gVK_F1ü~ç1gVK_F3ç1gVK_F4ç1gVK_F5ç1gVK_F6ç1gVK_F7ç1gVK_F8ç1gVK_F9ç1gVK_F10ç1g
VK_NUMLOCKÜç1g VK_SCROLLßç1g
VK_NUMPAD7á~ç1g
VK_NUMPAD9ç~ç1gVK_SUBTRACTó~ç1gVK_ADDí~ç1g
VK_NUMPAD1Ï~ç1g
VK_NUMPAD3Õ~ç1g
VK_DECIMALö~ç1gVK_F11ç1gVK_F12ç1g VK_DIVIDEù~ç1gVK_HOME~ç1gVK_PRIOR~ç1gVK_END~ç1gVK_NEXT~ç1g VK_INSERT3~ç1g VK_DELETE6~ç1gVK_LWIN½~ç1gVK_RWINÀ~ç1gVK_APPSÃ~ç1gGetKeyboardState>.gMulDiv6½ÍVfTHandleIÐáKgWA_INACTIVE¬}ç1cdMessages fTMessageÝ=5g WM_CREATE¯}ç1gWM_ACTIVATEAPP ~ç1fTWMActivateAppÌq'ägWM_ACTIVATE¾}ç1fTWMActivateÿ°cdSysUtils f Exception¢úÌ!g
.Exception ΪsgAnsiPosË gException.CreateFmtÊâ¹g
CompareMem.ì|g
fmOpenRead¬}ç1gfmShareDenyWrite~ç1gException.CreateÉâ¹cdClasses fTPersistentÁ1ÙfTListv rfTStream¬Ï{g.TPersistent¤Õ+gTPersistent.AssignToç!FqgTPersistent.DefinePropertiesè!Fqf
TComponentAffTFilerò)| gTPersistent.Assignë!Fqg.TComponentfù·gTComponent.DefinePropertiesÀa0þgTComponent.NotificationÆa0þgTComponent.ReadStateÈa0þgTComponent.SetNameÍa0þgTComponent.UpdateRegistryÒa0þgTComponent.ValidateRenameÓa0þgTComponent.WriteStateÖa0þgTComponent.QueryInterface×a0þgTComponent.BeforeDestructionàa0þgTComponent.SafeCallExceptionïa0þg.TListYÝOÿg TList.Add¥)EgPoint`r6gTList.Remove³)EgTPersistent.Destroyê!Fqg TList.Get)Eg TList.IndexOf¯)EgTList.Insert°)EfTCollectionItemk GÐfTCollection\.Èg.TCollectionItemNá$"gTCollectionItem.GetDisplayName-\hgTCollectionItem.SetCollection-\hgTCollectionItem.SetIndex-\hgTCollectionItem.SetDisplayName-\hgTComponent.LoadedÅa0þgTComponent.CreateÞa0þgTComponent.Destroyßa0þgTCollectionItem.Create-\hg.TCollection?¦ÚgTCollection.CreateNÝ gTCollectionItem.Destroy-\hgTCollection.GetCountNÝ gTCollection.GetItemNÝ fTFileStream4¸îµg.TFileStreamÌgTFileStream.CreateZØNgTStream.ReadComponentResßïgfmCreate*r2gT
Stream.WriteComponentResáïf.35È@ÙXg csLoadingAêÖëg csReadingDêÖëgcsDesigningMêÖëgTStream.ReadBufferÛïgTStream.WriteBufferÜïcdControls f
TWndMethod8gTWinControl.GetHandle;¾ßcdForms fTCustomFormI].g.TCustomForm,1ãcdMMSystem fTJoyCaps@©Ág joyGetDevCaps¾!®ÉgJOYERR_NOERROR¬}ç1f
TJoyInfoExT gJOY_RETURNX¯}ç1gJOY_RETURNY²}ç1gJOY_RETURNZ¸}ç1g JOY_RETURNPOVl~ç1gJOY_RETURNBUTTONS¬ç1gJOY_RETURNCENTERED-þò1gjoyGetPosExu(ftagJOYCAPSA@©ÁcdDirectX f TDIEffect/hØfTDIEnvelopeHR]fTDIConstantForceÈcåfTDIConditioni|TfTDIPeriodic³©)fIDirectInputEffect¥»¡pf TDIDataFormatâzfTDIObjectDataFormatý»%ÜfIDirectInputDevice×êfIDirectInputDevice2%L®fIDirectInputDeviceA×êfIDirectInputDevice2A%L®f TDIMouseStateúv§jfTDIJoyState2±ªQÀgDIJOFS_X¬}ç1gDIJOFS_Y¸}ç1gDIJOFS_ZÄ}ç1fIDirectInput¤f IDirectInputA¤f TDIEffect_DX6/hØgDIEFF_CARTESIANÜ}ç1gDIEFF_OBJECTOFFSETS²}ç1gDIEB_NOTRIGGERÑrâfTDIEffectInfoAdTnâgDIENUM_STOP¬}ç1gGUID_ConstantForcedÜ¢gDIEFT_PERIODICµ}ç1gDIEFT_CONDITION¸}ç1gDIEP_DIRECTIONl~ç1g DIEP_DURATION¯}ç1g DIEP_ENVELOPE¬ç1g DIEP_GAIN¸}ç1gDIEP_SAMPLEPERIOD²}ç1gDIEP_TRIGGERBUTTONÄ}ç1gDIEP_TRIGGERREPEATINTERVALÜ}ç1gDIEP_TYPESPECIFICPARAMS-õò1g
DIEP_START/rçgDIEGES_PLAYING¯}ç1gDIERR_INPUTLOST.ÓgDIERR_NOTACQUIREDøÓgDISCL_NONEXCLUSIVE²}ç1gDISCL_EXCLUSIVE¯}ç1gDISCL_BACKGROUNDÄ}ç1gDISCL_FOREGROUND¸}ç1gDI_OKÔ¾fTDIDeviceObjectInstanceA:è%gDIENUM_CONTINUE¯}ç1gGUID_UnknowndÜ¢g DIDFT_ALL¬}ç1gGUID_SysKeyboarddÜ¢gc_dfDIKeyboardYÐg
DIK_ESCAPE¯}ç1gDIK_1²}ç1gDIK_2µ}ç1gDIK_3¸}ç1gDIK_4»}ç1gDIK_5¾}ç1gDIK_6Á}ç1gDIK_7Ä}ç1gDIK_8Ç}ç1gDIK_9Ê}ç1gDIK_0Í}ç1g
DIK_EQUALSÓ}ç1gDIK_BACKÖ}ç1gDIK_TABÙ}ç1gDIK_QÜ}ç1gDIK_Wß}ç1gDIK_Eâ}ç1gDIK_Rå}ç1gDIK_Tè}ç1gDIK_Yë}ç1gDIK_Uî}ç1gDIK_Iñ}ç1gDIK_Oô}ç1gDIK_P÷}ç1gDIK_LBRACKETú}ç1gDIK_RBRACKETý}ç1g
DIK_RETURN ~ç1gDIK_LCONTROL~ç1gDIK_A~ç1gDIK_S ~ç1gDIK_D~ç1gDIK_F~ç1gDIK_G~ç1gDIK_H~ç1gDIK_J~ç1gDIK_K~ç1gDIK_L~ç1g DIK_SEMICOLON!~ç1gDIK_APOSTROPHE$~ç1g
DIK_LSHIFT*~ç1g DIK_BACKSLASH-~ç1gDIK_Z0~ç1gDIK_X3~ç1gDIK_C6~ç1gDIK_V9~ç1gDIK_B<~ç1gDIK_N?~ç1gDIK_MB~ç1g DIK_COMMAE~ç1g
DIK_PERIODH~ç1g DIK_SLASHK~ç1g
DIK_RSHIFTN~ç1gDIK_MULTIPLYQ~ç1g DIK_LMENUT~ç1g DIK_SPACEW~ç1gDIK_CAPITALZ~ç1gDIK_F1]~ç1gDIK_F2`~ç1gDIK_F3c~ç1gDIK_F4f~ç1gDIK_F5i~ç1gDIK_F6l~ç1gDIK_F7o~ç1gDIK_F8r~ç1gDIK_F9u~ç1gDIK_F10x~ç1gDIK_NUMLOCK{~ç1g
DIK_SCROLL~~ç1gDIK_NUMPAD7~ç1gDIK_NUMPAD8~ç1gDIK_NUMPAD9~ç1gDIK_SUBTRACT~ç1gDIK_NUMPAD4~ç1gDIK_NUMPAD5~ç1gDIK_NUMPAD6~ç1gDIK_ADD~ç1gDIK_NUMPAD1~ç1gDIK_NUMPAD2~ç1gDIK_NUMPAD3~ç1gDIK_NUMPAD0¢~ç1gDIK_DECIMAL¥~ç1gDIK_F11±~ç1gDIK_F12´~ç1gDIK_NUMPADENTER ç1gDIK_RCONTROLç1g
DIK_DIVIDEKç1g DIK_RMENUTç1gDIK_HOMEç1gDIK_UPç1g DIK_PRIORç1gDIK_LEFTç1g DIK_RIGHTç1gDIK_ENDç1gDIK_DOWNç1gDIK_NEXTç1g
DIK_INSERT¢ç1g
DIK_DELETE¥ç1gDIK_LWIN½ç1gDIK_RWINÀç1gDIK_APPSÃç1fTDIKeyboardStateuaEÐg GUID_SysMousedÜ¢gc_dfDIMouseYÐfTDIPropDWORDte¸ÚfTDIPropRangeoÈfTDIDeviceInstanceAk¶hf
TDIDevCapsO^gDIDEVTYPE_JOYSTICK¸}ç1gDIEDFL_ATTACHEDONLY¯}ç1gDIDC_FORCEFEEDBACK-õò1g GUID_JoystickdÜ¢gDIDF_ABSAXIS¯}ç1gDIPROP_AUTOCENTERÜÚügDIPH_DEVICE¬}ç1fPDIJOYSTATE2:gDIPROP_DEADZONEÜÚüg DIPH_BYOFFSET¯}ç1gDIPROP_RANGEÜÚügDIRECTINPUT_VERSION-ó1cdDXClass fTControlSubClass:?| gMin Ò´g DXLoadLibrary?wg.TControlSubClassZ×gTControlSubClass.Createc_ceDXConsts gSEffectNotFoundiif@gSCannotChangediif@gSNecessaryDirectInputUseMouseiif@gSNoFormiif@ceTypes fTPointçØc5DXInput _¸Ïc5System c5SysInit c5Windows c5Messages c5SysUtils %c5Classes Ic5Controls -c5Forms 9c5MMSystem Ec5DirectX yc5DXClass %c&.EDXInputError
ÍØz * EDXInputError 'ù²|&.EForceFeedbackEffectError ?*i~ *EForceFeedbackEffectError \V>%etNone 7 %etConstantForce : %
etPeriodic = %etCondition @ *TForceFeedbackEffectType ¾åu&.TForceFeedbackEffectObject áÅh *TForceFeedbackEffectObject 7 è&.TForceFeedbackEffect Ü
*TForceFeedbackEffect Cþ¸&.TForceFeedbackEffects cÕqø *TForceFeedbackEffects ¦%isUp Q?Ê %isDown T?Ê %isLeft W?Ê %isRight Z?Ê % isButton1 ]?Ê % isButton2 `?Ê
% isButton3 c?Ê % isButton4 f?Ê % isButton5 i?Ê % isButton6 l?Ê % isButton7 o?Ê % isButton8 r?Ê % isButton9 u?Ê %
isButton10 x?Ê %
isButton11 {?Ê %
isButton12 ~?Ê %
isButton13 ?Ê %
isButton14 ?Ê "%
isButton15 ?Ê $%
isButton16 ?Ê &%
isButton17 ?Ê (%
isButton18 ?Ê *%
isButton19 ?Ê ,%
isButton20 ?Ê .%
isButton21 ?Ê 0%
isButton22 ?Ê 2%
isButton23 ?Ê 4%
isButton24 ¢?Ê 6%
isButton25 ¥?Ê 8%
isButton26 ¨?Ê :%
isButton27 «?Ê <%
isButton28 ®?Ê >%
isButton29 ±?Ê @%
isButton30 ´?Ê B%
isButton31 ·?Ê D%
isButton32 º?Ê F* TDXInputState Ø 7*TDXInputStates ûÕö& .TCustomInput :ÒÎ *TCustomInput WþðL(TCustomInput.Update å
Ø!Self ce *
PKeyAssign
O½ò*
TKeyAssign UÅuþ*TKeyAssignList -W{ä&
.TKeyboard ½W0 * TKeyboard Ú1yÞ¢&.TMouse ¥·H¤ *TMouse Âãj±¦&
.TJoystick lìZ&¨ * TJoystick }Ôª&.TCustomDXInput \è¬ *TCustomDXInput 0
5®& .TDXInput A½° *TDXInput 8m:k²7.21F ´ 5DXConsts =c( AssignKey " KeyAssignList !State "Keysb ¶ø!."