Android .. Bildschirm drehen

[erich.wanker]

Hallo Leute..

Beim Start meiner app ist Landscape/Portrait möglich ..

Ich fixiere den Bildschirm bei einer speziellen Funktion:

Delphi-Quellcode:

  ScreenService: IFMXScreenService;
  OrientSet: TScreenOrientations;
begin



  if TPlatformServices.Current.SupportsPlatformService(IFMXScreenService, IInterface(ScreenService)) then
  begin
    OrientSet := [TScreenOrientation.Landscape];
    ScreenService.SetScreenOrientation(OrientSet);
  end;

Wie kann ich den "automatischen Modus" danach wieder aktivieren... weil wenn ich das einmal aufrufe bleibt das dann ...

es gibt leider kein [TScreenOrientation.DeviceOrientation];

Danke für Hinweise

Erich

Berlin 10.1 inkl Mobile