如何设置默认输入法

如何设置默认输入法

如何设置默认输入法

程序打开后，将默认输入法设置为英语

------解决方案--------------------

似乎使用了API。

------解决方案--------------------

这只能通过调用系统API来实现，特别是google

------解决方案--------------------

pb动态开关输入法

------解决方案--------------------

需要调用API

//输入法控件

函数boolean ImmSimulateHotKey（ULong hWnd，ULong dwHotKeyID）库“ IMM32.dll”

函数ulong GetKeyboardLayout（ulong dwLayout）库“ user32.dll”

函数boolean ImmIsIME（uLong hklKeyboardLayout）库“ IMM32.DLL”

/////

//切换为英文输入法

int IME_THotKey_IME_NonIME_Toggle = 112

ulong hklCurrent

hklCurrent = GetKeyboardLayout（0)

如果ImmIsIME（hklCurrent），则ImmSimulateHotKey（hnd，IME_THotKey_IME_NonIME_Toggle）

如果结束

------解决方案--------------------

您可以在此处下载

------解决方案--------------------

共享变量：

constant long IME_CHOTKEY_IME_NONIME_TOGGLE = 16 //切换中英文输入法

constant long IME_CHOTKEY_SHAPE_TOGGLE = 17 //切换半角和全角

constant long IME_CHOTKEY_SYMBOL_TOGGLE = 18 //切换中文标点和英文标点

恒定长IME_CHOTKEY_LAST = 47

外部变量：

函数long ImmSimulateHotKey（long h，long hkey）库'IMM32.dll'

函数long GetKeyboardLayout（long h）库'user32.dll'

函数布尔ImmIsIME（long h）库'IMM32.dll'

of_to_chinese（长h）的公共子例程；

//转换中文输入法

long lcurrent_ime

lcurrent_ime = getkeyboardlayout（0)

如果不是immisime（lcurrent_ime），那么

ImmSimulateHotKey（h，IME_CHOTKEY_IME_NONIME_TOGGLE）// hkey）

如果结束

结束子程序

of_to_english（长h）的公共子例程；

//转换英文输入法

long lcurrent_ime

lcurrent_ime = getkeyboardlayout（0)

如果immisime（lcurrent_ime）那么

ImmSimulateHotKey（h，IME_CHOTKEY_IME_NONIME_TOGGLE）

如果结束

结束子程序

公共函数boolean of_is_chinese（long h）;

//确认输入法类型

long lcurrent_ime

lcurrent_ime = getkeyboardlayout（0)

返回免疫（lcurrent_ime）

结束功能

public子例程f_tochinese（window mywin）；

/////将输入法调整为中文

如果of_is_chinese（handle（mywin））然后返回

of_to_chinese（handle（mywin））

结束子程序

公共子例程f_toenglish（window mywin）;

/////将输入法调整为英语

如果不是of_is_chinese（handle（mywin）），则返回

of_to_english（handle（mywin））

结束子程序

------解决方案--------------------

他们都是VB大师！ ！

------解决方案--------------------

讨论

他们都是VB大师！ ！

本文来自电脑杂谈，转载请注明本文网址：
https://www.pc-fly.com/a/shumachanpin/article-344802-1.html