正文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;

相关推荐
yybcp92 天前
2K200Hz显示器哪个值得选?
计算机外设
小小代码团3 天前
Roland 键盘合成器接声卡(福克斯特/雅马哈)声音小/音质异常的问题
计算机外设
yybcp93 天前
2K高刷电竞显示器推荐
计算机外设
yybcp94 天前
2K320Hz显示器哪个好?
计算机外设
多恩Stone5 天前
【ubuntu 连接显示器无法显示】可以通过 ssh 连接 ubuntu 服务器正常使用,但服务器连接显示器没有输出
服务器·ubuntu·计算机外设
andylauren5 天前
(5)STM32 USB设备开发-USB键盘
stm32·嵌入式硬件·计算机外设
MonkeyKing_sunyuhua7 天前
Ubuntu 22.04 能识别笔记本的键盘,但是无法识别外接键盘
linux·ubuntu·计算机外设
Studying 开龙wu8 天前
查看电脑或笔记本CPU的核心数方法及CPU详细信息
计算机外设·电脑
蓝奕世8 天前
前端小知识 鼠标穿透 pointer-events: none;
前端·计算机外设