Lazarus+LAMW强制form的方向

在OnRotate按下面的添加就可以强制指定横屏或竖屏了。

procedure TAndroidModule1.AndroidModule1Rotate(Sender: TObject;
  rotate: TScreenStyle);
begin
  if rotate = ssLandscape then   // device is on horizontal...
         Self.SetScreenOrientationStyle(ssPortrait);     //force Portrait...
end;   

标签：...,rotate,force,form,Self,TObject,Lazarus,LAMW,强制
来源： https://www.cnblogs.com/qiufeng2014/p/15863274.html