如何在Delphi中获取指定字体的默认宽度？

Question

我正在写一个DXF导出器/导入器。 DXF MTEX​​T实体格式支持文本块的宽度因子（它比默认字体宽度宽的次数）。 Windows LogFont记录包含lfWidth字段（如果选择logfont来创建hFont，则平均字体宽度将是多少像素）。如何获取使用字体的默认宽度来来回计算缩放系数？有没有WinAPI电话？

Answer 1

行。我找到了它。 getTextMetrics填充TEXTMETRIC记录。它有一个tmAveCharWidth。搜索到的值。