Tag: delphi xe5

如何通过线程执行工作负载时使微调器animation

我在使用iOS设备的Delphi xe5应用程序中的多个线程遇到麻烦。 我的目标是执行“一些工作”(SQL查询),而TAniIndicator正在旋转。 我尝试过使用Applicaiton.ProcessMessages(),但是如果有时候旋转的话,这并不能保持微调器的顺利加载。 这是我目前的代码为btn.OnClick begin if btnLogin.Text = 'Login' then begin aThread := TMyThread.Create(True); aThread.FreeOnTerminate := true; aThread.Start; while Mode1 = 0 do begin Form_Login.LoadSpinnerFrame.visible := True; Form_Login.LoadSpinner.Visible := True; Form_Login.LoadSpinner.Enabled := True; // Application.ProcessMessages; end; Form_Login.LoadSpinnerFrame.visible := False; Form_Login.LoadSpinner.Visible := False; Form_Login.LoadSpinner.Enabled := False; btnLogin.Text := 'Logout'; aThread.Destroy; end else begin btnLogin.Text := […]

如何在Delphi XE5下查找分辨率

我开始在Delphi XE5下开发一款游戏。 我有Firemonkey的解决schemefunction的问题。 当我打开屏幕,我检查在iPhone上的分辨率,我得到320×480。 但iPhone 4和5的原始分辨率翻了一番。 我在官方的Delphi页面发现,FireMonkey正在重新计算屏幕的“分辨率”,这是视网膜显示2。 我认为这对于普通应用程序来说是很酷的function,但是当你开始做游戏,并且想要通过代码来处理图像时,会带来奇怪的情况。 我的问题是 – 有没有办法find实际的分辨率值,或至less是什么实际的设备types(iPhone,iPad?) 谢谢

在Delphi XE中使用UIDocumentInteractionController

我有一个delphiXE5应用程序下载和本地存储在设备上的PDF文件。 我有一个TWebBrowser在窗体上查看PDF文件,它完美的作品。 我现在希望与其他应用程序(如Safari,邮件等)共享PDF,但真的很挣扎! 我已经看了TShowShareAction操作(在动作列表控件上),但是这需要共享一个位图(照片)。 我已经看到很多post解释说应该使用UIDocumentInteractionController,但是我不能find如何在Delphi中使用它的例子。 我曾经看过Apple.Utils,但无济于事。 有没有人使用Delphi应用程序中的UIDocumentInteractionControllerfunction共享文件? 任何例子将不胜感激!

如何检查networking在Android和iOS上是否可用(Delphi XE5)

如何检查Android和iOS上的networking是否可用?