Серый форум — AHK: Переключения языка ввода в Windows с помощью скрипта

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (teadrinker) — Mon, 11 May 2020 19:14:54 +0000

Нет, не всегда работает. Попробуйте на таком окне:

Gui, Show, w300 h300

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (EV) — Mon, 11 May 2020 17:40:33 +0000

Работает? И ладно. Код не устаревшего варианта?

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (teadrinker) — Mon, 11 May 2020 16:57:16 +0000

EV, у вас какой-то совсем устаревший вариант. WinID — это не UInt, это Ptr. И зачем там SetFormat? Желательно разобраться в скрипте перед тем, как постить.

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (EV) — Mon, 11 May 2020 14:16:20 +0000

Или переключать по кнопке:

LOCALE_EN := 0x4090409
LOCALE_RU := 0x4190419
F3::
	if WinActive("ahk_class ConsoleWindowClass") {
		PostMessage, 0x50, 0x02, 0,, A
	}
	else {
		SetFormat, Integer, H
		WinGet, WinID,, A
		ThreadID := DllCall("GetWindowThreadProcessId", "UInt", WinID, "UInt", 0)
		InputLocaleID := DllCall("GetKeyboardLayout", "UInt", ThreadID, "UInt")
		PostMessage, 0x50, 0, % ((InputLocaleID == LOCALE_EN) ? LOCALE_RU : LOCALE_EN),, A
		SetFormat, Integer, D
	}
	return

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (EV) — Mon, 11 May 2020 12:35:39 +0000

PostMessage, 0x50, 0, 0x4190419,, A ;ru
PostMessage, 0x50, 0, 0x4090409,, A ;en

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (Malcev) — Mon, 11 May 2020 12:10:07 +0000

PostMessage, 0x50, 0, 0x4190419,, A ru

Что за название окна странное?

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (EV) — Mon, 11 May 2020 03:01:10 +0000

PostMessage, 0x50, 0, 0x4190419,, A ru
PostMessage, 0x50, 0, 0x4090409,, A en

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (EV) — Mon, 11 May 2020 02:46:46 +0000

Locale_En := 0x4090409  ; Английский (американский).
  Locale_Ru := 0x4190419  ; Русский.

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (dv20200228) — Fri, 28 Feb 2020 20:04:16 +0000

Порядок действий. Например, язык ввода: английский.

Назначить сочетание клавиш для данного языка ввода в настройках языковой панели: Пуск > Панель управления > Язык и региональные стандарты > Языки и клавиатура > Изменить клавиатуру > Переключение клавиатуры > Сочетания клавиш для языков ввода: выбрать Английский > Сменить сочетание клавиш > Использовать сочетание клавиш: Ctrl+1.

Создать файл .txt (документ).
Открыть файл > Ввести: Send, ^1 > Сохранить файл путем "Сохранить как", дать название файлу, в кавычках, с расширением .ahk: "en.ahk".

Запустить файл Ahk2Exe.exe (программа; находится в папке программы AutoHotkey) > Источник: указать местоположение файла en.ahk (скрипт); Назначение: указать местоположение будущего файла, дать название файлу: en > Конвертировать.
Переместить файл en.exe (исполнитель скрипта) в папку, на которую в будущем будет ссылаться файл .lnk из панели быстрого запуска.

Создать файл .lnk (ярлык) для файла en.exe > Дать название файлу: en > Свойства > Сменить значок: выбрать файл .ico (значок; расположен в доп. установленных файлах .ico), отображающий флаг, соответствующий языку ввода > Применить.
Переместить файл на панель быстрого запуска (доп. установленная программа).
Запустить файл en c панели быстрого запуска. Активируется язык ввода: английский.

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (dv20200228) — Fri, 28 Feb 2020 20:02:29 +0000

ypppu, спасибо, разобрался. Работает!

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (ypppu) — Fri, 28 Feb 2020 18:10:25 +0000

Какое vbs? Вы создали тему в разделе AutoHotkey.

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (dv20200228) — Fri, 28 Feb 2020 17:52:37 +0000

ypppu, увы, синтаксическая ошибка, код: 800A03EA, ошибка компиляции Microsoft VBScript. Создавал в блокноте, с сохранением "...vbs". Где-то ошибся?

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (ypppu) — Fri, 28 Feb 2020 17:41:36 +0000

Первый скрипт:

Send, ^1

Второй скрипт:

Send, ^2

И так далее.

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (dv20200228) — Fri, 28 Feb 2020 16:08:27 +0000

ypppu, да, быстрее, если ярлык расположен на панели быстрого запуска (доп. установленная программа), и нагляднее, если в качестве значка для ярлыка установлен соответствующий языку ввода флаг. Заморочно, конечно, но удобно:)))
Подскажите скрипт, плиз...

Re: AHK: Переключения языка ввода в Windows с помощью скрипта

null@example.com (ypppu) — Fri, 28 Feb 2020 15:12:35 +0000

Найти на рабочем столе нужный ярлычок, сделать по нему двойной щелчок ЛКМ - получается быстрее, чем нажать на клавиатуре Ctrl+1?