这个打印判断的问题怎么就是不能解决

Question

在库中的记录  
状态  
1  
2  
3  
报表打印时  
我想判断状态是  
'1'时我就打印'正常'  
 报表的QRDBtext1.left:=200
'2'时我就打印'特殊'  
 报表的QRDBtext1.left:=150
'3'时我就打印'损坏'  
 报表的QRDBtext1.left:=100有大哥告诉我这样
 在QRDBtext1的OnPrint中写
if (value = '1') then
  value := '正常'
else if (value = '2') then
  value := '特殊'
...但是判断时已经迟了,当条记录它没有判断出来,到下条记录时才生效,如何才能解决我上述的功能了,请大哥们帮帮忙.

Answer 1

我的一个小思路：
你可以用表达式来代替QRDBText，在表达式中看看能不能实现判断？

Answer 2

procedure TForm1.DetailBand1BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
beginif (value = '1') then
  value := '正常'
else if (value = '2') then
  value := '特殊'
...end;