怎样才可以在自己做的窗口中显示当前的输入法状态?(100分)(100分)

  • 主题发起人 主题发起人 knightlzf
  • 开始时间 开始时间
K

knightlzf

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样才可以在自己做的窗口中显示当前的输入法状态?<br>要求:当改变当前输入法的时候,显示要跟着发生改变。
 
怎么没人回答我?是不是分数太少了,再加100分。
 
怎么没人回答我?是不是分数太少了,再加100分。<br>
 
其实很简单在delphi的编辑控件中有这样一个属性寄选择你要的输入法<br>你可以加一个列表矿用来现实它的内容在程序例加入运行是改变的代码即可<br>也可以访问注册表但比较复杂请参阅相关书记
 
read:<br>var <br>&nbsp; IMEName: array [0..9] of char;<br>begin<br>&nbsp; if GetKeyboardLayoutName(@(IMEName[0])) then<br>&nbsp; &nbsp; showmessage('Current IME is '+ StrPas(PChar(@(IMEName[0]))));<br>end;<br><br>set:<br>&nbsp; Edit1.ImeName := '智能ABC输入法'
 
多谢你们的答案,由于我是刚开始学delphi,所以能不能具体一点。谢谢!!!<br>Another_eYes的答案得出的结果好像是一些地址来的,怎样才可以把这些信息用<br>中文显示出来。谢谢Another_eYes的答案,谢谢!!!
 
&lt;a href="http://www6.163.com/news/p-item/0,1587,it_925_it,00.html"&gt;Delphi下汉字输入法的编程及使用&lt;/f&gt;
 
&lt;a href="http://www6.163.com/news/p-item/0,1587,it_925_it,00.html"&gt;Delphi下汉字输入法的编程及使用&lt;/a&gt;
 
谢谢你们的答案,不知道怎么获得当前的输入法状态。
 
not tested:<br><br>ShowMessage(Screen.Imes.Strings[Screen.Imes.IndexOfObject(Pointer(GetKeyboardLayout(0))];
 
我不知道怎样把另外的分给你们,请给我说明。谢谢你们的答案。谢谢!!!!
 
多人接受答案了。
 
后退
顶部