如何去掉报表中的0.00 ?

[dgzhou]

在报表中如何实现一数值字段（是计算字段）保留2位小数，但是为0时就不打印？
也就是不要打印出0.00之类的东西。

[dudo]

在onprint事件中判断Value是否为"0.00"，是则 Value=""，否则不变.

[dgzhou]

可该字段是数值型，可如何让它等于""呢？难道要另加一个string型的计算字段不成？

[halfdream]

如果出现的地方比较多倒不如直接把判断的程序写在
OnCalcFields 事件中。

[dudo]

完全可行,请看
procedure TForm1.QRLabel1Print(sender: TObject; var Value: String);
^^^^^^^^^^^^^^^^^
注意到 var Value: String 声名了吗.实际上在onprint事件中所有类型的字段，都已转化为string型,并且可以对 value做出判断，更改为自己想要的值，不过用的最多的可能也是按照我们想要的输出格式来打印吧。

[hellen2000]

把QRDBTEXT换成QRLabel,在BandBeforePrint事件中作判断.
if fieldbyname('')=0 then QRLabel.caption='' else
QRLabel.caption=currtostr();

[dgzhou]

谢谢多位，我的问题已经帮我解决了。再次多谢。