delphi XE5 安卓设置屏幕横屏竖屏

Application.FormFactor.Orientations := [TFormOrientation.soLandscape, TFormOrientation.soInvertedLandscape];