以下是引用su0527在2015-12-23 22:11:11的发言:
首先,感谢您的回答.
但如果分辩率与开发者的分辩率不同,fontsize的结果会不会是小数.这样fontsize会不会是一个非法值.
首先,感谢您的回答.
但如果分辩率与开发者的分辩率不同,fontsize的结果会不会是小数.这样fontsize会不会是一个非法值.
FontSize是一个“磅”值,并非简单视作一个可变的“缩放”数值,详细参考VFP HELP。
如果字体字号是动态变动的话,问题就变得有点复杂。
大部份是“可缩放字体”,没有既定字号表。“不可缩放字体”,既定的字号表也不相同。
程序代码:
** 字体字号信息 SET TALK OFF CLEAR CREATE CURSOR tt (ff C(240)) AFONT(aFontName) && 取字体 FOR i = 1 TO ALEN(aFontName) AFONT(aFontSize, aFontName[i]) && 取字体的字号 cMsg = IIF((aFontSize[1] == -1), "可缩放字体 ","不可缩放字体 ") cMsg = cMsg + aFontName[i] +" 字号 " FOR j = 1 TO ALEN(aFontSize) cMsg = cMsg + " " + TRANSFORM(aFontSize[j]) ENDFOR INSERT INTO tt VALUES (cMsg) ENDFOR GO TOP BROWSE