procedure TVKBaseForm.FormCreate(Sender: TObject);
begin
if TPlatformServices.Current.SupportsPlatformService
(IFMXVirtualKeyboardToolbarService, IInterface(FService1)) then
begin
FService1.SetToolbarEnabled(True);
FService1.SetHideKeyboardButtonVisibility(True);
end;
end;
Вопрос
DMS
В офф демке нашел такой пример:
procedure TVKBaseForm.FormCreate(Sender: TObject); begin if TPlatformServices.Current.SupportsPlatformService (IFMXVirtualKeyboardToolbarService, IInterface(FService1)) then begin FService1.SetToolbarEnabled(True); FService1.SetHideKeyboardButtonVisibility(True); end; end;
Объясните плиз, что эти методы делают и зачем?
Ссылка на комментарий
1 ответ на этот вопрос
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.