没有废话,直接正题:
1.首先你的工程目录下必须有info.plist.TemplateiOS.xml文件,文件内容如下:
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>UIViewControllerBasedStatusBarAppearance</key>
<false/><%VersionInfoPListKeys%>
<%ExtraInfoPListKeys%>
</dict>
</plist>
请注意上面的关键部分:UIViewControllerBasedStatusBarAppearance,具体到这个参数的作用,请自行搜索。
2.在你的代码里这样写:
function SetStatusBarFontColor(const IsWhite: Boolean = True): Boolean;
var
APP: UIApplication;
begin
APP := TUIApplication.Wrap(TUIApplication.OCClass.sharedApplication);if IsWhite then
APP.setStatusBarStyle(UIStatusBarStyleLightContent, False)
else
APP.setStatusBarStyle(UIStatusBarStyleDefault, False);Result := True;
end;procedure TForm1.Button1Click(Sender: TObject);
begin
SetStatusBarFontColor(True);
end;procedure TForm1.Button2Click(Sender: TObject);
begin
SetStatusBarFontColor(False);
end;
注意,字体颜色只有黑白两种颜色,具体为什么,请自行思考或搜索。
3.还有其它的一些具体问题,不明白或者不清楚的请自行搜索。