如何在PB中切换中英文输入法数

函数声明：
function boolean ImmSimulateHotKey (ULong hWnd, ULong dwHotKeyID) library "IMM32.dll"
function ulong GetKeyboardLayout(ulong dwLayout) LIBRARY "user32.dll"
function boolean ImmIsIME(uLong hklKeyboardLayout) library "IMM32.DLL"

脚本如下：
constant int IME_THotKey_IME_NonIME_Toggle=112
ulong hklCurrent
ulong hnd

//切换到英文输入法
hklCurrent=GetKeyboardLayout(0)
if ImmIsIME(hklCurrent) then
hnd=Handle(parent)
ImmSimulateHotKey(hnd,IME_THotKey_IME_NonIME_Toggle)
end if

//切换到中文输入法
hklCurrent=GetKeyboardLayout(0)
if not ImmIsIME(hklCurrent) then
hnd=Handle(parent)
ImmSimulateHotKey(hnd,IME_THotKey_IME_NonIME_Toggle)
end if

最新文章

在C/S体系中设置工作站与服务器的时钟同步[01-04]

利用PB数据窗口特征制作进度条[01-04]

PowerBuilder应用开发系列讲座(1)[01-04]

在POWERBUILDER中使用WINSOCK控件的方法[01-04]

在PowerBuilder中动态调用函数[01-04]

PowerBuilder应用开发系列讲座(6)[01-04]

相关文章