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

转载于 2015-11-20 05:19:00 发布 · 82 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/onechen/p/4979655.html

文章标签：

#移动开发

本文介绍如何在Delphi环境下通过调用iOS API获取设备的字体大小，适用于iOS7.0及以上版本。

说明：在 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;

Android 请参考：

[函數] Firemonkey Android 取得系统参数设定的字型大小

转载于:https://www.cnblogs.com/onechen/p/4979655.html