注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

gb.qin

A Man's心靈的港灣

 
 
 

日志

 
 

dbgrideh中如何将小数显示为百分比(集)  

2009-11-09 20:33:07|  分类: Delphi |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

dbgrideh中如何将小数显示为百分比??大家不要说floattostr,因为我的这个字段为了避免麻烦和出错,必须是数字型的,不能为字符型,我看见有个displayformat属性,我设置为"0.00%"结果是不正确的,有没有人知道应如何设置??

在该字段的OnGetText事件中写如下代码:   
    
  procedure   TForm1.Table1FreightGetText(Sender:   TField;   var   Text:   String;   
      DisplayText:   Boolean);   
  begin   
      Text   :=   FloatToStr(Sender.AsFloat   *   100)   +   '%';   
  end;   
    

如何能使计算字段的结果保存为小数点后两位呢??比如:2.75%,有些字段结果很长,不需要这么多该怎么办?

procedure   TForm1.Table1FreightGetText(Sender:   TField;   var   Text:   String;   
      DisplayText:   Boolean);   
  begin   
      Text   :=   FloatToStr(Round(Sender.AsFloat   *   10000)/100)   +   '%';   
  end;  
  评论这张
 
阅读(502)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017