delphi XE Android下让TMemo不自动弹出键盘  
官方Delphi 学习QQ群: 682628230(三千人)
频道

delphi XE Android下让TMemo不自动弹出键盘


用TMemo来显示一段说明文字,可一点Memo,就弹出键盘,找了半天控制键盘的属性,没找到。最后将readOnly设置为True搞定。

如果需要一个form都不显示keyboard,那么可以利用全局变量
VKAutoShowMode来控制,这个全局变量可以有下面三个值。
TVKAutoShowMode = (DefinedBySystem, Never, Always)

DefinedBySystem:由系统确定
Never:从不弹出键盘
Always:总是弹出键盘

为了不显示Keyboard,设置
procedure TCheckVersionForm.FormActivate(Sender: TObject);
begin
//禁止弹出键盘.
  VKAutoShowMode := TVKAutoShowMode.Never;
end;

因为是全局变量,还要在窗品Deactivate时,恢复原来的值,不然所有界面都不弹出virtualKeyBoard了!这不是你想要的结果。

procedure TCheckVersionForm.FormDeactivate(Sender: TObject);
begin
  VKAutoShowMode:=TVKAutoShowMode.DefinedBySystem;

end;

 

来源 http://blog.sina.com.cn/s/blog_44fa172f0102vgna.html


推荐分享
图文皆来源于网络,内容仅做公益性分享,版权归原作者所有,如有侵权请告知删除!
 

Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号

执行时间: 0.043624877929688 seconds