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

相关阅读 >>

Delphi systemparametersinfo 用法

Delphi 判断文件名是否有效

Delphi spy++ 拖拽功能

Delphi 如何把类中的方法做参数

Delphi cpu窗口的扩展学习

Delphi 正则表达式tperlregex 类的属性与方法

Delphi 关于 "高位" 与 "低位"

Delphi 获取一个文件夹下的一级目录

Delphi 提取标签之间的字符串

Delphi获取注册表run下所有值

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...