top / index / prev / next / target / source
日記形式でつづる いがぴょんコラム ウェブページです。
以下のコードを記載することにより画面を縦に固定できます。RAD Studio 10 Seattle + iPhone 6 で確認しました。
procedure TForm1.FormCreate(Sender: TObject);
begin
// 画面を縦に固定
Application.FormFactor.Orientations := [TFormOrientation.Portrait,
TFormOrientation.InvertedPortrait];
end;