用QR作报表，如何设置数据格式？(100分)

H

Hecules

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-15

• #1

我的工作环境是：DELPHI6+SQLSERVER2000+ADO
我的想法是，用：DELPHI6自带的QR作报表，把数据为：0，的字段，
让报表在预览打印时，此字段为空。（就是不显示出来。）
如果，数据不为：0，就设置为：Mask='#0.00'
如果：用：设QrDbText.Mask:='#';这样，数据为：0时，会变成空，
但，同时，若数据不为：0，会自动把有小数的取整。达不到效果。
请教，我该如何作？若要写程序，写在哪个事件中？
谢谢。

 

L

leehq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-15

• #2

可以在OnPrint事件中判断,
if(Value = '0') then
Value := '';

 

T

tseug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-15

• #3

别忘了后面得分号
#,##0.##;;

 

D

dali2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #4

同意tseug

 

S

svw0506

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #5

在DataBase的AfterOpen事件里写：
if (DataBase.Fields[0].Isnull) or (DataBase.Fields[0].AsString='0') then
QrDbText.Mask:='#'
else
QrDbText.Mask:='#0.00';

 

S

svw0506

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #6

我上面写错了，这锯话应该写在DetailBand的BeforePrint事件里才对，
而不是写在在DataBase的AfterOpen事件里写

 

H

Hecules

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #7

多人接受答案了。