Delphi 取得 iOS 辅助使用里的字型大小

本文整理自网络，侵删。

 说明：在 iOS 里有一个人性化的辅助设定，可以将字体放大，但这个设定对 Delphi 是不起作用的，还好 Delphi 提供了这个 iOS API 可以取得。

开发环境：Delphi 10 Seattle

运行系统：iOS 7.0 以上

参考资料：Apple 官网




 

源码：

function iOSFontSize: Single;
var f: UIFontDescriptor;
begin
     f := TUIFontDescriptor.OCClass.preferredFontDescriptorWithTextStyle(UIFontTextStyleBody);
     Result := f.pointSize;
end;
 

相关阅读 >>

Delphi firedac 的recordcount 相关测试 记录

Delphi android调用授权管理打开通知监听服务

Delphi 动态调整打印机纸张大小

Delphi 使用fastscript调试脚本

Delphi实现注册表的操作

Delphi从字符串中取出数字

Delphi xe5 android 开发实现手机打电话和发短信

Delphi 查找某函数在某个单元

Delphi 选择文件夹对话框 (有新建文件夹按钮)修正版

Delphi二值图像膨胀算法

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 取得 iOS 辅助使用里的字型大小