Лех, нет. Я говорю про тот файл, где ты запущал

Стой. Он работает, да. Но это не то что я хочу: там вот сейчас я попробовал - пишет по-русски. Я же хочу, чтоб запускался блокнот и, когда окно становится активным, переключался на энглиш.

0

23.05.2022

Ruslan aka DUDE

Оригинал Оригинальный
Стой. Он работает, да. Но это не то что я хочу: та...

совместите свой код который вы в самом начале показали с этим кодом, выкинув всё лишнее) и получится то что хотели)

0

23.05.2022

Alexey

Ruslan aka DUDE
совместите свой код который вы в самом начале пока...

ну да. наверное еще можно сразу в буфер обмена бахнуть результат, чтобы в латех сразу вставлять,если нет изменений

0

23.05.2022

Оригинал Оригинальный Автор вопроса

Ruslan aka DUDE
совместите свой код который вы в самом начале пока...

Вот такой код: #Include <WinAPIEx.au3> Run("notepad.exe") WinWaitActive("Безымянный — Блокнот") $hWnd = WinGetHandle("Безымянный — Блокнот") _WinAPI_LoadKeyboardLayout("00000409", $hWnd) ;_WinAPI_LoadKeyboardLayout("0x0409", $hWnd) Exit Не должен работать?

0

23.05.2022

Alexey

Оригинал Оригинальный
Вот такой код: #Include <WinAPIEx.au3> Run("notepa...

я бы на этот код денег не поставил.

0

23.05.2022

Ruslan aka DUDE

Оригинал Оригинальный
Вот такой код: #Include <WinAPIEx.au3> Run("notepa...

Я могу лишь сказать что там где вы взяли 0x0409 в кавычки - точно работать не будет А первый вариант - хз, не видел документацию, щас с телефона, лень набирать название функции, оно длинное)

0

23.05.2022

synapse

Оригинал Оригинальный
Вот такой код: #Include <WinAPIEx.au3> Run("notepa...

#Include <WinAPIEx.au3> Run("notepad.exe") WinWait("[CLASS:Notepad]", "") $hWnd = WinGetHandle("[CLASS:Notepad]") If @error Then MsgBox($MB_SYSTEMMODAL, "", "An error occurred when trying to retrieve the window handle of Notepad.") Exit EndIf _WinAPI_SetKeyboardLayout($hWnd,0x0419) If @error Then MsgBox($MB_SYSTEMMODAL, "", "An error occurred when trying to SetKeyboardLayout") Exit EndIf Exit

0

23.05.2022

Оригинал Оригинальный Автор вопроса

synapse
#Include <WinAPIEx.au3> Run("notepad.exe") WinWai...

Никого.

0

23.05.2022

synapse

Оригинал Оригинальный
Никого.

оригинально

0

23.05.2022

Оригинал Оригинальный Автор вопроса

synapse
#Include <WinAPIEx.au3> Run("notepad.exe") WinWai...

Это при условии, что функция определена, как сказал Russian?

0

23.05.2022

Ruslan aka DUDE

Оригинал Оригинальный
Это при условии, что функция определена, как сказа...

Я не руссиан)

0

23.05.2022

Ruslan aka DUDE

synapse
#Include <WinAPIEx.au3> Run("notepad.exe") WinWai...

Этот

0

23.05.2022

Alexey · Accepted Answer

Вроде этот Opt("TrayIconDebug", 1) Opt("TrayAutoPause", 0) Opt("TrayMenuMode", 1 + 2) ; Не отображать в трее пункты меню по умолчанию (Script Paused/Exit) и не отмечать галочками при выборе. $nap = InputBox("Создание массива", "> Внимание! блабла", '"\dfrac{" &""& $i') Local $sText = '' For $i = 1 To 2 For $j = 1 To 3 $a = Execute($nap) ; В inputBox можно вводить $i $sText &= $a & " " Next $sText &= @CRLF Next If Not WinExists("[CLASS:Notepad]") Then Run("notepad") Local $hWnd = WinWait("[CLASS:Notepad]", "", 10) ConsoleWrite(@HOUR & ':' & @MIN & ':' & @SEC & ' $sText = ' & $sText & @CRLF) $sText = StringTrimRight($sText, 2) ConsoleWrite(@HOUR & ':' & @MIN & ':' & @SEC & ' $sText 5= ' & $sText & @CRLF) ControlSetText($hWnd, "", "Edit1", $sText)

169 похожих чатов

Лех, нет. Я говорю про тот файл, где ты запущал

16 ответов

Похожие вопросы