Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для Maza Faka

Ветеран


Сообщения: 604
Благодарности: 133

Профиль | Отправить PM | Цитировать


Maksimkama
Я писал не про кодировку, а про языковую раскладку:
Код: Выделить весь код
Run("notepad.exe")

WinWait("[Class:Notepad]")

$hWnd = WinGetHandle("[Class:Notepad]")

_SetKeyboardLayout("00000419", $hWnd)

Send("Привет мир!")

Func _SetKeyboardLayout($sLayoutID, $hWnd)
    Local $WM_INPUTLANGCHANGEREQUEST = 0x50
    Local $ret = DllCall("user32.dll", "long", "LoadKeyboardLayout", "str", $sLayoutID, "int", 0)
    DllCall("user32.dll", "ptr", "SendMessage", "hwnd", $hWnd, "int", $WM_INPUTLANGCHANGEREQUEST, "int", 1, "int", $ret[0])
EndFunc
Код: Выделить весь код

Дополнительные языки.

"00000407" Немецкий (стандартный) 
"00000409" Английский (США) 
"0000040C" Французский (стандартный) 
"0000040D" Финский 
"00000410" Итальянский 
"00000415" Польский 
"00000419" Русский 
"00000422" Украинский 
"00000423" Белорусский 
"00000425" Эстонский 
"00000426" Латвийский 
"00000427" Литовский 
Это сообщение посчитали полезным следующие участники:

Отправлено: 11:12, 16-06-2008 | #651