欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件金字塔软件问题提交 → 默认小数位

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有2790人关注过本帖树形打印复制链接

主题:默认小数位

帅哥哟,离线,有人找我吗?
yukizzc
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2014/6/23 13:11:30 [显示全部帖子]

FRACPART( )

看下这个函数取小数


 回到顶部
帅哥哟,离线,有人找我吗?
yukizzc
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2014/6/23 14:13:23 [显示全部帖子]

VARIABLE:an=0,num=0;
a:FRACPART(c);

if FRACPART(a*10)=0 and num=0 then an:=1;               //1位小数

 

else if FRACPART(a*100)=0  then
begin
an:=2;                                                                         //2位小数,由于类似2.80这种小数直接判断会返回1所以加了个num的控制关
num:=1;
end

 

answer:an                                                                  //最后输出这个位数

[此贴子已经被作者于2014/6/23 14:22:14编辑过]

 回到顶部