dbtext成功实现了自动换行(通过指定宽度加换行符chr(13)),也在beforeprint中使得
shape.top:=0;
shape.height:=band.height;
可是到预览时,band自动调得很高,而shape的高度并不是band高度,下端没到band的底端,使得band下端与dbtext下端空出很大块,我用showmessage看了一下band 与shape的高度,它们又是相同高度,说明band的高度还是原来高度,只是在预览时自动调高了。想请高手解决两个问题,一个是如何不让band空一大块,第二个是让shape正好伸到band底端,但是如果数据短,没换行,则一切正常。
shape.top:=0;
shape.height:=band.height;
可是到预览时,band自动调得很高,而shape的高度并不是band高度,下端没到band的底端,使得band下端与dbtext下端空出很大块,我用showmessage看了一下band 与shape的高度,它们又是相同高度,说明band的高度还是原来高度,只是在预览时自动调高了。想请高手解决两个问题,一个是如何不让band空一大块,第二个是让shape正好伸到band底端,但是如果数据短,没换行,则一切正常。
给你个思路(刚刚想到,没试过):自行处理dbtext的换行,将超出一行的部分放在ChildBand(LoopBand)中,原band中需要扩展高度的shape等等复制一份到ChildBand。