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如何获取句柄?

Delphi xe strpas 遇到的问题

Delphi 用 gdi+ 给图片添加花边的例子

Delphi 用updateresource修改exe文件图标(已修正)

Delphi 判断 中文字符

Delphi 自动填表代码

Delphi seek函数中参数说明

Delphi rest请求控件增加请求头时不编码

Delphi webbrowser获取页面全部链接

Delphi 使用openjdk进行Delphi android开发

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



打赏

取消

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

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

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

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

评论

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