QuickRep 的问题请教(100分奉上)(100分)

  • 主题发起人 主题发起人 wuyongyuan
  • 开始时间 开始时间
W

wuyongyuan

Unregistered / Unconfirmed
GUEST, unregistred user!
我用QUICKREP设计报表时,用QRSHAPE来画线,有设过他的宽度,为什么在预览时显示QRSHAPE
的线条特别粗,而在打印出来又不会呢?还有就是如何对某个QRDBTEXT进行动态赋值或者动态
计算,就象对某列的QRDBTEXT的值都乘以10,或者把某行某列的值赋值为空?
 
看不清,能不能把问题一行一行写开来呀!
 
1、用QRSHAPE来画线,为什么在预览时显示QRSHAPE的线条特别粗,而在打印出来又不会呢?
2、如何对某个QRDBTEXT进行动态计算,就象对某列的QRDBTEXT的值都乘以10,或者把某行某列的值赋值为空?
 
1、QuickReport就是这样,我刚才试验了一下Delphi7带的那个rave什么好像也一样。
如果你使用针式打印机,那么能够实现所见机所得,使用激光,就是打出的线很细,宽度为1和为2没什么明显区别。
但是你使用Frame的边框就可以。

2、这个你需要使用SQL语句或者使用QuickReport的高级打印事件来完成。
 
老弟:怎么还用QR???D7都没有QR了!!!!用Fastreport吧!!
 
我所使用的是激打,所以我设置了SHAPE的宽度预览才造成这样的,使用高级打印事件?
能否举例看看!谢谢
 
我说的打印Shape的宽度,是没有什么高级打印事件来完成的,自我感觉,这个很难解决。
如果说你的第二个问题,如何打印出×10或者其他的数据,可以在QuickReport的OnNeedData里面赋值。
这样可以实现,或者在QRDBText的OnPrint里面赋值,这样也许还简单许多。
 
TO>>>玩命:
D7没有QUICKREP了,呵呵。。。在下还不知晓!

To >>> yzhshi:
在QRDBText的OnPrint里面赋值?是否可以直接写 Value := Value * 10:
还有在OnNeedData应该如何写代码?望指教!
 
试验一下Value:=StrToFloat(StrToFloat(Value)*10);
确实D7没有附带QuickReport,而是改成了一个叫rave什么的控件,但是那个东西更耗资源[:(]
 
呵呵。。。要也是 Value := FloatToStr(StrToFloat(Value)*100);吧 :)~~~~~~~~~~~~
 
呵呵,键盘误,哈哈
 
还有我想问你一下,就是想在表格的后面,就是紧接着表格的底线了啦【:)】,我想在那
加一大堆的文字,那么我用Group Footer打印出来没东西,Page Footer要是只一行文字,
他打印在页底,请问如何解决?还望不吝赐教!
 
使用pagefooter可以解决的,你可以设置他的位置还有打印的字的行数,你直接放置多个DBCaption就可以了。
如果你要打印的东西固定的话。
 
没有吧,是哪个属性可以设置他的位置在表格底线下呢?
 
你自己去对准,这个就需要耐心了。还有CurrentY属性可以,不过很难的,不如直接自己手工对其。
 
直接对准?不太可能,因为我还不知道有多少条记录,表格有多少行,所以想是否可以在
表格后加这些文字!
 
呵呵,就是这样。至少我只知道PageFooter的这种办法。
 
那照你的意思是没什么办法了?除非是取得表格打印后的事件所停留的当前坐标,然后在用
Page Footer给加上去,不过好像这样加上去也是在页底打印这些文字的阿!
 
[:)]你的思路是对的,CurrentY就是干这个的,不过不推荐使用。
 
不是吧,不推荐使用,那么不就等于没辙了?
那要是我在报表中要算 某一列的值 = 其他两列的积,是否可以 QRDBEDIT3.VALUE := FLOATTOSTR(StrToFloat(QRDBEDIT1.VALUE) * StrToFloat(QRDBEDIT2.VALUE)); ?
还有就是在报表中要算 某一列的和,是否可以对每个QRDBEDIT3.value累加?那么相加时,也就在报表打印时的这个累加有效吗?

不好意思,问了这么多,麻烦回答好吗?我刚接触报表的,谢谢你了【:)】
 
后退
顶部