如何模拟 Alt+Shift 来更改 Windows 中的语言（第二部分）？

Question

问题（动态切换语言）通过 解决ActivateKeyboardLayout，但当我在表单上动态创建组件（例如 TEdit ）时它仍然存在。当该组件获得焦点时，语言将更改为默认语言。创建组件后，我尝试再次使用ActivateKeyboardLayout，但它不起作用。有什么想法吗？

Answer 1

首先你必须使用“Windows”然后你可以使用这个方法：
激活键盘布局（EnglishLayoutHandle，KLF_ACTIVATE）
您可以将“EnglishLayoutHandle”更改为您想要的任何语言

Answer 2

您的问题可能与此问题类似。

否则这段代码会这样做：

keybd_event(VK_MENU, 0, 0, 0);
keybd_event(VK_SHIFT, 0, 0, 0);
keybd_event(VK_MENU, 0, KEYEVENTF_KEYUP, 0 );
keybd_event(VK_SHIFT, 0, KEYEVENTF_KEYUP, 0);

Answer 3

在控制台应用程序上使用

HWND handle = GetForegroundWindow();
PostMessage(handle, WM_INPUTLANGCHANGEREQUEST,
            0, (LPARAM)HKL_NEXT);