Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;- toggle F4 > russian or english-US
- ;;$F4::
- ;sc3a & Q::!F4
- vkA0 & vkA4:: ; LShift + LAlt
- V++
- M:=mod(V,2)
- if M=1
- SetDefaultKeyboard(0x0419) ; Russian
- else
- SetDefaultKeyboard(0x0409) ; english-US
- return
- SetDefaultKeyboard(LocaleID){
- Global
- SPI_SETDEFAULTINPUTLANG := 0x005A
- SPIF_SENDWININICHANGE := 2
- Lan := DllCall("LoadKeyboardLayout", "Str", Format("{:08x}", LocaleID), "Int", 0)
- VarSetCapacity(Lan%LocaleID%, 4, 0)
- NumPut(LocaleID, Lan%LocaleID%)
- DllCall("SystemParametersInfo", "UInt", SPI_SETDEFAULTINPUTLANG, "UInt", 0, "UPtr", &Lan%LocaleID%, "UInt", SPIF_SENDWININICHANGE)
- WinGet, windows, List
- Loop %windows% {
- PostMessage 0x50, 0, %Lan%, , % "ahk_id " windows%A_Index%
- }
- }
- return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement