mirror of
https://gitlab.com/octospacc/Configs.git
synced 2025-01-03 09:59:46 +01:00
16 lines
726 B
AutoHotkey
Executable File
16 lines
726 B
AutoHotkey
Executable File
#NoEnv
|
|
SetBatchLines -1
|
|
ListLines Off
|
|
#NoTrayIcon
|
|
|
|
TabletModeController_SetMode(TabletModeController, _TABLETMODESTATE, _TMCTRIGGER := 4) {
|
|
return DllCall(NumGet(NumGet(TabletModeController+0),4*A_PtrSize), "Ptr", TabletModeController, "UInt", _TABLETMODESTATE, "UInt", _TMCTRIGGER)
|
|
}
|
|
|
|
ImmersiveShell := ComObjCreate("{C2F03A33-21F5-47FA-B4BB-156362A2F239}", "{00000000-0000-0000-C000-000000000046}")
|
|
TabletModeController := ComObjQuery(ImmersiveShell, "{4fda780a-acd2-41f7-b4f2-ebe674c9bf2a}", "{4fda780a-acd2-41f7-b4f2-ebe674c9bf2a}")
|
|
|
|
TabletModeController_SetMode(TabletModeController, A_Args[1])
|
|
|
|
ObjRelease(TabletModeController), TabletModeController := 0
|
|
ObjRelease(ImmersiveShell), ImmersiveShell := 0 |