Tag: delphi 10 seattle

Delphi / Firemonkey在运行时更改iOS屏幕旋转

基本上所有我想实现的是，当一个用户在应用程序的某个部分根据需要更改屏幕旋转，我有这个Andriod的工作，我不明白为什么它不应该为iOS procedure TForm1.Button1Click(Sender: TObject); var ScreenService: IFMXScreenService; OrientSet: TScreenOrientations; begin if TPlatformServices.Current.SupportsPlatformService(IFMXScreenService, IInterface(ScreenService)) then begin OrientSet := [TScreenOrientation.soLandscape];//<- Break point set here and line is executed ScreenService.SetScreenOrientation(OrientSet); end; end; 采取从这里： 如何防止与android开发在delphi xe5 Firemonkey屏幕旋转 ScreenService.SetScreenOrientation被执行并且不会引发exception，但方向不会改变，我也在Project> Options> Application> Orientation中设置了启用自定义方向 ，但是这也没有任何作用。 对我来说奇怪的是，如果不支持，那就不应该这样 if TPlatformServices.Current.SupportsPlatformService(IFMXScreenService, IInterface(ScreenService)) 返回false？ 甚至没有进入开始 我添加了一个testingbutton来检查屏幕的方向后，我把它设置为只与景观 if TPlatformServices.Current.SupportsPlatformService(IFMXScreenService, IInterface(ScreenService)) then begin case ScreenService.GetScreenOrientation of TScreenOrientation.Portrait: ShowMessage('Portrait'); […]

在Delphi 10 Seattle上接收iOS推送通知

这里的主要目标是使用Delphi 10 Seattle生成和接收 Push Notifications 。 我试图跟随这个video，但到目前为止，我只能成功地发送推送通知。 有这个令人难以置信的教程 ，帮助我更好地了解应用程序ID，供应configuration文件，证书，PEM文件，SSL连接等。 这基本上是我现在看到的（ 是的，这是一个真正的董事会 ）： 但有趣的是关于我需要在delphi链接的configuration文件。 它必须与APNS证书具有相同的反向域名。 我可以通过在Delphi的Tools > Options > Provisioning在苹果会员中心创build的Push Support来可视化Provisioning Profile 。 但是，即使提供的Version Info中的CFBundleIdentifier与来自Xcode的Bundle标识符（App ID）相匹配，我也无法在Project > Options > Provisioning看到任何不属于iOS Team Provisioning Profile的供应configuration文件 。 我只能运行该应用程序，如果我在Team Prefix Bundle ID包括Team Prefix ，但我觉得我一定是做错了什么。 通知只有在应用程序链接了正确的证书时才有效。 这就是我得到的应用程序令牌： procedure TFormPush.Button1Click(Sender: TObject); var FormPush : TFormPush; APushService : TPushService; AServiceConnection: TPushServiceConnection; ADeviceID : […]

在Firemonkey中获取Android设备和操作系统信息

我知道如何获取应用程序版本，包名称，为Android和iOS的udid但是对于iOS我可以得到更多的信息。 下面的代码返回模型名称，设备名称，ostypes和os版本： string(Device.model.UTF8String);//Model name string(Device.name.UTF8String);//Device name string(Device.systemName.UTF8String);//Os type string(Device.systemVersion.UTF8String);//Os version 也有可能得到这个信息对于Android？ 我目前在Delphi 10西雅图工作。