FireMonkey Sammelthread

[Merkur]

Der Tip mit dem Video war super! So erscheint die Tastatur:

Delphi-Quellcode:

procedure TLoginViewForm.edPasswordEnter(Sender: TObject);
var
  KBDService : IFMXVirtualKeyboardService;

begin
  if TPlatformServices.Current.SupportsPlatformService(
     IFMXVirtualKeyboardService, IInterface(KBDService)) then
    begin
      edPassword.SetFocus;
      KBDService.ShowVirtualKeyboard(LoginViewForm);
    end;
end;