如何用API函数隐藏输入法？在线等待！！！！！！！！！

Question

如何在delphi中调用Windows中的API函数隐藏输入法？

Answer 1

API函数：BOOL ImmSimulateHotKey
(HWND hWnd,DWORD dwHotKeyID);//模拟热键
其中Hwnd为程序窗口的句柄,dwHotHKeyID
为模拟的热键,若成功则返回True
HKL GetKeyboardLayout(DWORD dwLayout);
//获得当前键盘状态
BOOL ImmIsIME(HKL hKL);
//判断当前是否处于中文输入状态,若是则返回True
自定义函数：关闭中文输入法：CloseIme;
使用时uses中加上imm 
procedure TForm1.closeime;
var
myhkl:hkl;
begin
myhkl:=GetKeyBoardLayOut(0);
if ImmIsIME(myhkl) then 
//判断是否在中文状态,若是则关闭它 
immsimulateHotkey(handle,
IME_CHotKey_IME_NonIME_Toggle);
end;