Einzelnen Beitrag anzeigen

Benutzerbild von erich.wanker
erich.wanker

Registriert seit: 31. Jan 2008
Ort: im schönen Salzburger Land
460 Beiträge
 
Delphi XE4 Professional
 
#6

AW: Delphi 10.2 - Scrollable Form Demo geht nicht

  Alt 26. Jul 2017, 10:33
ich hab jetzt folgendes... funktioniert für mich


Delphi-Quellcode:
procedure TForm1.FormVirtualKeyboardShown(Sender: TObject;
  KeyboardVisible: Boolean; const Bounds: TRect);
begin

  FKBBounds := TRectF.Create(Bounds);
  FKBBounds.Top := trunc(screen.Height/2)-40;
  FKBBounds.Left:= 0;
  FKBBounds.Width:= screen.Width;
  FKBBounds.Height:= trunc(screen.Height/2)+40;

  //FKBBounds.TopLeft := ScreenToClient(FKBBounds.TopLeft);
  //FKBBounds.BottomRight := ScreenToClient(FKBBounds.BottomRight);
  UpdateKBBounds;
end;

P.S. Hallo Mensch72

hauptsächlich waren für mich 2 Fehler - die durch 10.2 beseitigt worden sich - wichtig:

Die SystemStatusBar von Android wurde nicht richtig berechnet (Höhe) deshalb hab ich meine App auf "Fullscreen" setzten müssen

Beim Druck auf den "Home-Button" von Android ist meine App angehalten worden .. nach einer Minute warten (ohne Userinteraktiin) kam dann auf einmal "Project1 wurde beendet"

Die Fehlerliste: https://edn.embarcadero.com/article/44747

LiGrü
Erich
Erich Wanker - for life:=1971 to lebensende do begin ..
O
/H\
/ \
  Mit Zitat antworten Zitat