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

解决方案 »

  1.   

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

  2.   

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

  3.   

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

  4.   

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

  5.   

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

  6.   

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

  7.   

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