信封连打的问题！急！！！！！ (100分)

我正在做一个信封批量打印程序，与数据库相连，在窗体上直接生成一个记录的预览区
（TPanel）然后我要怎么做才能按照预览区的样式把所有的记录都打印出来呢？？？在这一
点上，我可是一点思路都没有！
难道真的要把数据一条一条的反应到窗体上面吗？？？然后再form.print吗？？？
求教一个好的方法！
问题很急，请大家费心了！
关于打印机和和屏幕关系问题，朋友们已经帮我解决，我很感谢，待问题结束，我会把
分数分给大家的，谢谢！

up

我见一个朋友是把信封扫描成图片，然后在上面应该的位置上放Label，从数据库赋值。
这样打印出来的效果和实际信封的效果一样。
分辨率帮你找一找，一大堆。
http://www.delphibbs.com/delphibbs/dispq.asp?lid=168470
http://www.delphibbs.com/delphibbs/dispq.asp?lid=096488
http://www.delphibbs.com/delphibbs/dispq.asp?lid=614665
http://www.delphibbs.com/delphibbs/dispq.asp?lid=688985
http://www.delphibbs.com/delphibbs/dispq.asp?lid=720237
http://www.delphibbs.com/delphibbs/dispq.asp?lid=254838
。。。。。。。。。。。。。

获娶显示当前打印机的分辨率
在程序中加入一行：ShowMessage(′水平分辨率′＋inttostr(GetDeviceCaps(printer?Handle

LOGPIXELSX))＋chr(13)＋′垂直分辨率：′＋inttostr(GetDeviceCaps(printer?Handle

LOGPIXELSY)));结果就一目了然了。

谢谢楼上的朋友，待问题解决我再分派分数，谢谢了！！！

您为何不使用FastReport或ReportBuild等工具呢？
http://www.51delphi.com 有下载啊？[]