S
spirit_day
Unregistered / Unconfirmed
GUEST, unregistred user!
窗体中有dbgrid时，切换窗体好象会把原有的输入法清空。<br>请问如何能够保持切换时原有输入法不便，谢谢！<br>比较急！
A
ak_2004
Unregistered / Unconfirmed
GUEST, unregistred user!
imename属性都设成同一种输入法
S
spirit_day
Unregistered / Unconfirmed
GUEST, unregistred user!
楼上的，谢谢，但这不是我想要的。<br>因为每个人用这个程序可能选择的输入法不一样。<br>如果设置为一种那就更不方便了。
A
abcdman
Unregistered / Unconfirmed
GUEST, unregistred user!
可让操作员提前选择,然后保存该操作员及所选择的输入法,启动程序时,对imename进行赋值,或是每次启动时选择一下,这算是很人性化的方法哦.
S
steven7581
Unregistered / Unconfirmed
GUEST, unregistred user!
先将各操作员的输入法存入数据，进入系统后各个窗体再载入各操作员的输入法，就用各输入框的imename属性
S
spirit_day
Unregistered / Unconfirmed
GUEST, unregistred user!
楼上两位说的方法是可行，也比较人性化。<br>不过小弟还是想通过捕捉事件或者切换前的输入法状态，来动态的赋值，这样感觉更好一点。<br>继续等待更好的答案，谢谢各位！
H
huiqilin
Unregistered / Unconfirmed
GUEST, unregistred user!
在每個窗體創建是執行清空輸入法的方法 <br>窗體的控件imeMode：imDontCare<br>procedure EmptyIme;<br>var<br> i: integer;<br> PropInfo
PropInfo;<br>begin<br> //訪問form上的所有組件<br> for i:=0 to ComponentCount -1 do<br> begin<br> //檢查 Components是否有ImeName屬性<br> PropInfo :=GetPropInfo(Components.ClassInfo,'ImeName');<br> if PropInfo<>nil then<br> SetStrProp(Components,propInfo,'');<br> end;<br> end;<br>end.
PropInfo;<br>begin<br> //訪問form上的所有組件<br> for i:=0 to ComponentCount -1 do<br> begin<br> //檢查 Components是否有ImeName屬性<br> PropInfo :=GetPropInfo(Components.ClassInfo,'ImeName');<br> if PropInfo<>nil then<br> SetStrProp(Components,propInfo,'');<br> end;<br> end;<br>end.