搜索
编程论坛
→
数据库技术
→
『 VFP论坛 』
→ 如果字体不存在,换另外一种字体,怎么写代码?
标题:
如果字体不存在,换另外一种字体,怎么写代码?
取消只看楼主
su0527
等 级:
论坛游民
帖 子:452
专家分:79
注 册:2015-1-10
结帖率:
96.03%
楼主
已结贴
√
问题点数:20 回复次数:2
如果字体不存在,换另外一种字体,怎么写代码?
比如label1的字体设置为“幼圆”,如果电脑中没有装该字体,则设置label1的字体为“微软雅黑”,如果该字体也没有在该电脑中安装,则设置label1的字体为“宋体”。
请问代码如何写?
搜索更多相关主题的帖子:
字体
存在
代码
微软
安装
2017-11-24 10:07
su0527
等 级:
论坛游民
帖 子:452
专家分:79
注 册:2015-1-10
第
2
楼
得分:0
回复 2楼 吹水佬
接下来如何处理?
只能选用可放缩字体吗?
[此贴子已经被作者于2017-11-25 12:26编辑过]
2017-11-25 12:24
su0527
等 级:
论坛游民
帖 子:452
专家分:79
注 册:2015-1-10
第
3
楼
得分:0
吹水佬,如下可否:
if afont(s,"幼圆")=.t. &&返回值为真,说明该字体可用
thisform.label1.fontname="幼圆"
else
if afont(s,"微软雅黑")=.t.
thisform.label1.fontname="微软雅黑"
else
thisform.label1.fontname="宋体"
endif
endif
2017-11-25 12:49
3
1/1页
1
参与讨论请移步原网站贴子:
https://bbs.bccn.net/thread-482766-1-1.html
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.028028 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved