一个打印的问题(100分)

数据库中的数据如下：
ID a b c d e f g
1 10 0 0 0 5 0 0
2 0 6 0 5 0 0 0
3 0 7 2 0 0 11 19
........
想打印出来的报表为：
ID a b c d e f g
1 10 5
2 6 5
3 7 2 11 19
.................
就是说如果表中的数据的值为零时，就不打印这个零，用空格来代替。
如何解决呢？

关注

我的笨方法：
1、创建一个temptable；
2、检查每一行，把fieldvalue为‘0’的用‘’替代；
3、打印temptable。
4、free。

如果是用QuickReport的话：
可以在QrLabel或QrDBLabel的OnPrint事件中处理：
procedure TQuickReport1.QRLabel1Print(sender: TObject;
var Value: String);
begin

if Value='0' then
Value:='';
end;

如果是QrDBLabel还可在它对应的DataField中作点小手脚。

接受答案。

杜宝，Thanks!