本文整理自网络,侵删。
uses FMX.VirtualKeyboard;
var Keyboard: IFMXVirtualKeyboardService;begin if TPlatformServices.Current.SupportsPlatformService (IFMXVirtualKeyboardService, IInterface(Keyboard)) then begin Keyboard.HideVirtualKeyboard; end;end;
相关阅读 >>
Delphi报警声音 beep、messagebeep 和 windows.beep
Delphi中输入框不能输入初数字意外的字符串的函数(isnumeric)
更多相关阅读请进入《Delphi》频道 >>