| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 701 人关注过本帖
标题:vfp 字体设置问题
只看楼主 加入收藏
lgp740401_72
Rank: 1
等 级:新手上路
帖 子:48
专家分:0
注 册:2014-4-17
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:9 
vfp 字体设置问题
Local oFont As StdFont                  
oFont = Createobject('StdFont')   
oFont.Name =Iif(Empty(页脚字体),"Verdana",页脚字体)
oFont.Size =Iif(页脚fontsize=0,9,页脚fontsize)   ——怎么oFont.Size 变成货币型?按说应该是数值型啊
图片附件: 游客没有浏览图片的权限,请 登录注册
2014-04-17 21:06
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:0 
这是哪?报表?
2014-04-17 21:46
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
收藏
得分:20 
StdFont類設計的Size屬性就是貨幣類型,這種數據類型並不僅僅指貨幣,而是指精確的浮點數,與普通浮點數不能表達某些數値不同,它的表達範圍較窄,但絕無誤差。這個類型設計的Size屬性,是字體文件限制著的,它有一定的取値範圍(實際上那是非連續的枚舉値),比如,你把10賦値給Size,它實際上是9.75,而賦値9則仍然是9,這應該是TureType字體算法造成的。

授人以渔,不授人以鱼。
2014-04-17 22:08
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
收藏
得分:0 
你運行一下這個程序就知道了:
程序代码:
CLEAR
oFont = CREATEOBJECT("StdFont")
WITH oFont
    ? "Name = ", .Name, "Size = ", .Size, "VarType = ", VARTYPE(.Size)
    FOR nValue = 6 TO 40
        .Size = nValue
        ? "Size = ", .Size
    NEXT
ENDWITH
RELEASE oFont
RETURN


授人以渔,不授人以鱼。
2014-04-17 22:13
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
要学习的东西真多。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2014-04-18 07:05
簖缘
Rank: 2
等 级:论坛游民
帖 子:6
专家分:21
注 册:2014-4-17
收藏
得分:0 
应该尽自己最大努力去学习
2014-04-18 07:18
liuxingang28
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:山东济南
等 级:贵宾
威 望:47
帖 子:658
专家分:2180
注 册:2014-2-7
收藏
得分:0 
真是学无止境,高手如云啊!凭着二十年的功力,原以为自己也算是“高手”了吧?现在看,自己最多也不过才爬到半山腰……

泉城飞狐
2014-04-18 08:13
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:0 
你的武功也8濑
2014-04-18 08:34
lgp740401_72
Rank: 1
等 级:新手上路
帖 子:48
专家分:0
注 册:2014-4-17
收藏
得分:0 
回复 3 楼 TonyDeng
非常感谢你的回答,但在VFP中取得的FONTsize是数值型,那应该怎么转换?用CAST AS简单转换过来可以吗?
2014-04-18 08:44
liuxingang28
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:山东济南
等 级:贵宾
威 望:47
帖 子:658
专家分:2180
注 册:2014-2-7
收藏
得分:0 
使用 CAST()函数可在不同数据类型之间转换,如下所示:
i = 100                && 数值型
? vartype(i)           && 显示 N
j = cast(i as y)       && 将 i 转换成货币型
? vartype(j)          && 显示 Y
k = cast(j as n(10,2)) && 将货币型转换成数值型
? vartype(k)           && 显示 N

泉城飞狐
2014-04-18 09:24
快速回复:vfp 字体设置问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.031632 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved