关于quickrep如何自动分页~!?

时间:2022-01-25 22:19:24
用的是delphi6。
     quickrep最下面有个qrmemo控件,字数不固定,有可能是几百字,也有可能是几千字,如何实现根据字数自动分页。如果字数在一页内可以打下,则打印和预览都是一页,如果一页打不下,则打印和预览均自动增加到2页。
另外,我用的是fieldbyname().asstring赋值的,没有直接连接数据库~!
高手,请帮忙,谢谢~!

9 个解决方案

#1


期待大虾出现ing。。。。。。。

#2


試試將band --> autoHeight設為True
    將memo-->wordwrap設為true  autostretch設為true

#3


band的autoheight属性我这里没有,我用的是delphi6。
剩下的设置了,确实可以自动分页,但第二页的起始位置同第一页memo的起始位置一样,也就是第二页从纸的中下方才开始打印,第三页也是一样。
有没办法把第二页的打印位置提高到纸的上方~!
谢谢~!

#4


這個應該是跟你的版面設定有關,比如上面放了哪些band

#5


可能是我没说清楚~!
quickrep的右下方有个memo,大概在A4纸右下的2/3处,需分页打印的就只是这个memo的内容,按照3楼的方法设置后,第一页没问题,第二页的起始打印位置与大小和第一页那个memo的位置与大小一样,这样,第二页仅仅使用的是右下方那一部分空间,其余部分均空白。
可否把第二页需打印的内容提高至页上方开始,长度为A4纸的长度。
谢谢~!

#6


應該猜得出,你的memo并不是放在detailband。把你的memo所在的band的type改為rbChild看看

#7


我的memo就是放在qrband上的,属性是rbDetail,如果改成rbChild,除了表头,剩下的都不显示了(除了表头,剩下的都在同一个qrband上,属性是rbDetail)

#8


关于quickrep如何自动分页~!?

#9


memo獨立放在一個band上,給band設置屬性比如是group或者footer。這樣應該可以解決你的問題...
自己多試試其他方法,這樣不是辦法....我手頭上沒有可測試的環境...

#1


期待大虾出现ing。。。。。。。

#2


試試將band --> autoHeight設為True
    將memo-->wordwrap設為true  autostretch設為true

#3


band的autoheight属性我这里没有,我用的是delphi6。
剩下的设置了,确实可以自动分页,但第二页的起始位置同第一页memo的起始位置一样,也就是第二页从纸的中下方才开始打印,第三页也是一样。
有没办法把第二页的打印位置提高到纸的上方~!
谢谢~!

#4


這個應該是跟你的版面設定有關,比如上面放了哪些band

#5


可能是我没说清楚~!
quickrep的右下方有个memo,大概在A4纸右下的2/3处,需分页打印的就只是这个memo的内容,按照3楼的方法设置后,第一页没问题,第二页的起始打印位置与大小和第一页那个memo的位置与大小一样,这样,第二页仅仅使用的是右下方那一部分空间,其余部分均空白。
可否把第二页需打印的内容提高至页上方开始,长度为A4纸的长度。
谢谢~!

#6


應該猜得出,你的memo并不是放在detailband。把你的memo所在的band的type改為rbChild看看

#7


我的memo就是放在qrband上的,属性是rbDetail,如果改成rbChild,除了表头,剩下的都不显示了(除了表头,剩下的都在同一个qrband上,属性是rbDetail)

#8


关于quickrep如何自动分页~!?

#9


memo獨立放在一個band上,給band設置屬性比如是group或者footer。這樣應該可以解決你的問題...
自己多試試其他方法,這樣不是辦法....我手頭上沒有可測試的環境...