Delphi XE10 android emulator

Zdravim.
By bylo ještě par dotazu.

Moje první apka pro android.

Form a na něm GridPanelLayout.
Do GridPanelLayout jsem nastrkal tlačitka.
Je to OK, ale když otočím tablet, tlačitka nejsou všechny, jelikož na ležato tam všechny nevlezou.
Jak na to abych s aplikací moh posouvat?

Da se zakazat v me aplikaci automaticke otačení?

Napadá ma použiť TVertScrollBox/THorzScrollBox ... podľa potreby.

Druhá časť - otáčanie:

uses
  ..., FMX.Platform;

procedure TLogin.FormCreate(Sender: TObject);
var
  ScreenService: IFMXScreenService;
  OrientSet: TScreenOrientations;
begin
  if TPlatformServices.Current.SupportsPlatformService(IFMXScreenService, IInterface(ScreenService)) then
  begin
    OrientSet := [TScreenOrientation.soLandscape];
    ScreenService.SetScreenOrientation(OrientSet);
  end;
end;

Dik, toto řešení jsem už take našel.
http://stackoverflow.com/questions/25488475/how-to -prevent-screen-rotation-with-android-development- in-delphi-xe5-firemonkey
Pomalu čtu a učím ale občasne nakopnutí neuškodí

První otazka se řeší přes komponentu GestureManager a FloatAnimation.
https://joseleondotes.wordpress.com/2013/10/02/rad -studio-xe5-adding-gestures-to-the-drawer/
Pokud jsou 2 komponenty je to OK.
Nedaři se , když mam jen 1 komponentu (GridPanelLayout)

Netuším čo riešiš, prečo to riešiš a ako to riešiš...
Žiadny kód, žiadny screenshot, nič...

Proste sa uč... začni trebárs príkladmi:
C:\Users\Public\Documents\Embarcadero\Studio\18.0\ Samples\Object Pascal\Mobile Snippets
resp.
C:\Users\Public\Documents\Embarcadero\Studio\18.0\ Samples\Object Pascal\Multi-Device Samples

O toto mi jde.
button.png

Když mam tablet na stojaka, je to ok.
Na ležato vidim jen par tlačitek.

Toto mi už funguje.

procedure TForm1.GridPanelLayout1Gesture(Sender: TObject;
  const EventInfo: TGestureEventInfo; var Handled: Boolean);
begin
   case EventInfo.GestureID of
    sgiRight:
    begin
      pohnivravo;
    end;
    sgiLeft:
    begin
      pohnivlevo;
    end;
   end;
end;

Když přejedu prstem přes GridPanelLayout, vola to procedury pohnivravo a pohnivlevo.
Takže mi schazí 2 prcedurý, ktere přes FloatAnimation budou posouvat ten GridPanelLayout.

PS: Psal jsem v prvnim postu, že je delphi na počitači v praci.
Ty sample tam nejsou.
Daji se někde stahnout dodatečně?

https://sourceforge.net/p/radstudiodemos/code/HEAD /tree/branches/RADStudio_Berlin/Object%20Pascal/