用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;