DelphiXE8 开发IOS时,状态栏透明
0条评论
[摘要:起首,将项目标.info.plist文件中到场 keyUIViewControllerBasedStatusBarAppearance/key false/ 然后将窗体设置为齐屏(fullScreen=True) 正在窗体的Create事情中写进代码 procedure TForm1.FormCreate(Sender: TObject);]
首先,将项目的.info.plist文件中加入
<key>UIViewControllerBasedStatusBarAppearance</key>
<false/>
然后将窗体设置为全屏(fullScreen=True)
在窗体的Create事件中写入代码
procedure TForm1.FormCreate(Sender: TObject);
var
APP:UIApplication;
begin
APP := TUIApplication.Wrap(TUIApplication.OCClass.sharedApplication);
// APP.setStatusBarStyle(UIStatusBarStyleDefault,True);
// APP.setStatusBarStyle(UIStatusBarStyleLightContent,True);
APP.setStatusBarStyle(UIStatusBarStyleBlackOpaque,True);
end;
运行就Ok了。
最新发现,这方法就是扯蛋,纯色背景直接设置属性就行了,而非纯色的还不晓得咋弄.
浙公网安备 33010602011771号