On Wednesday, June 29, 2005 at 1:22:29 AM UTC-7, Stephen Quinn wrote:
Tom
Ok, but this is a docket printer.
You should be able to control the paper size.
nItems2Print := aLen( aItems )
nHeight := nItems2Print * AvgFontHeight + FudgeFactor
oPrinter:PageLength := nHeight
// ? Header
for i := 1 upto nItems2Print
oPrinter:TextOutput( /*parameters*/, aItem[i], RIGHT_ALIGN )
next
// ? Footer
If you also print header/footer thhen you just add the # of lines to the height
I don't have a docket printer available to test it on though<g>
HTH
Steve
still have my docket printer.
--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)