打印的重大问题，打印的火警问题(200分)

hi:TXJ，你的问题解决了吧，我现在要编一个超市收银系统的前台打印，
很明显，纸张高度是动态变化的，请问你是怎样解决这个问题的？

直接用打印机的控制码，在每页的后面调整一下下一页的开始位置，你试试看。
比较麻烦，不过我的一个服装洗涤码程序就是这样解决的。
Function Escape(hdc:Hdc;
nEscape,cbInput:Integer;
lpvInData:LPCSTR;
lpvOutData:LPVOID):Integer;

那位高手看一下我的问题呀？关于打印机状态检测的！
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1072105