关于dbtext换行后band与shape自动调节高度的问题(100分)

dbtext成功实现了自动换行（通过指定宽度加换行符chr(13)），也在beforeprint中使得
shape.top:=0;
shape.height:=band.height;
可是到预览时，band自动调得很高，而shape的高度并不是band高度，下端没到band的底端，
使得band下端与dbtext下端空出很大块，我用showmessage看了一下band 与shape的高度，
它们又是相同高度，说明band的高度还是原来高度，只是在预览时自动调高了。
想请高手解决两个问题，一个是如何不让band空一大块，第二个是让shape正好伸到band底端,
但是如果数据短，没换行，则一切正常。