Y ynkmsun Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-21 #1 我用QReport的QRExpr可以得到页小计,我也有一个将小写金额转成大写的函数,但是现在不知道怎么把QRExpr得到的页小计金额转成大写的。
B bryanwang Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-21 #3 可以对QRExpr1.Value应用你的函数.当然QRExpr1就不能显示了,加个qrlabel来帮忙: qrlabel1.caption := ConvertFunction(QRExpr1.Value);
可以对QRExpr1.Value应用你的函数.当然QRExpr1就不能显示了,加个qrlabel来帮忙: qrlabel1.caption := ConvertFunction(QRExpr1.Value);
Y ynkmsun Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-22 #4 bryanwang, 不行啊,用这个方法也试了很多了!
B bryanwang Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-22 #5 用QRExpr的方式我没用过,但觉得原理可行(我会去试试),如果只为完成功能的话还有 笨办法,定义个变量自己汇总, 在Detailsband的afterprint中 Amt:= Amt+ dataset.fieldbyname('amt').asfloat; 在Pagefooter的beforeprint中 qrlabel1.caption := ConvertFunction(amt); amt := 0; 这样总可以了吧?
用QRExpr的方式我没用过,但觉得原理可行(我会去试试),如果只为完成功能的话还有 笨办法,定义个变量自己汇总, 在Detailsband的afterprint中 Amt:= Amt+ dataset.fieldbyname('amt').asfloat; 在Pagefooter的beforeprint中 qrlabel1.caption := ConvertFunction(amt); amt := 0; 这样总可以了吧?
Y ynkmsun Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-22 #6 bryanwang:自己汇总的方法可以,但我知道用QRExpr的方式怎么办
B bryanwang Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-23 #7 找到了,QRExpr.Onprint事件里处理! procedure TForm1.QRExpr1Print(sender: TObject; var Value: String); begin Value := ConvertFunction((Strtofloat(Value)); end;
找到了,QRExpr.Onprint事件里处理! procedure TForm1.QRExpr1Print(sender: TObject; var Value: String); begin Value := ConvertFunction((Strtofloat(Value)); end;