delphi – 在VCL中禁用DbGrids.pas中键盘布局的自动更改
发布时间:2020-12-15 10:04:44 所属栏目:大数据 来源:网络整理
导读:我使用ActivateKeyboardLayout(HKL_NEXT,KLF_ACTIVATE);使用Delphi XE2加载波斯语键盘布局,但有时我点击TextBox或DbGrid控件键盘自动更改为英文布局. 如何禁用键盘布局的自动更改? 解决方法 我们有同样的问题.从D2006升级到D2010后出现此错误. 问题出在DBGr
我使用ActivateKeyboardLayout(HKL_NEXT,KLF_ACTIVATE);使用Delphi XE2加载波斯语键盘布局,但有时我点击TextBox或DbGrid控件键盘自动更改为英文布局.
如何禁用键盘布局的自动更改? 解决方法
我们有同样的问题.从D2006升级到D2010后出现此错误.
问题出在DBGrids.pas中: procedure TCustomDBGrid.WMKillFocus(var Message: TMessage); begin ImeName := Screen.DefaultIme; ImeMode := imDontCare; inherited; if not ((InplaceEditor <> nil) and (HWND(Message.WParam) = InplaceEditor.Handle)) then ActivateKeyboardLayout(Screen.DefaultKbLayout,KLF_ACTIVATE); end; 我不知道为什么Borland / Embarcadero在继承之后添加了“if block”.更改会导致将键盘布局切换回默认值.我们必须将DBGrids复制到我们的项目中并删除“if block”. (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |