Author | Topic: printing problem | |
---|---|---|
Jeremy Suiter | printing problem on Fri, 30 Jun 2006 10:30:49 +0100 Hi I'm trying to put a test print job together that switches paper bins mid job, but I'm having problems. Is it possible? My code is below. Thanks Jeremy start printing oPrinter:startDoc() oPrinter:setPaperBin(1) Page 1 oPS:=XbpPresSpace():New() aSize:=oPrinter:paperSize() aSize:={aSize[5]-aSize[3], aSize[6]-aSize[4]} oPS:Create(oPrinter, aSize, GRA_PU_LOMETRIC) GraStringAt(oPS, {200,2600}, "Test Page 1") oPS:configure() set paper bin and new page oPrinter:newPage() oPrinter:setPaperBin(3) Page 2 oPS:=XbpPresSpace():New() aSize:=oPrinter:paperSize() aSize:={aSize[5]-aSize[3], aSize[6]-aSize[4]} oPS:Create(oPrinter, aSize, GRA_PU_LOMETRIC) GraStringAt(oPS, {200,2600}, "Test Page 2") oPS:configure() end printing oPrinter:endDoc() | |
Jeremy Suiter | Re: printing problem on Fri, 30 Jun 2006 10:53:37 +0100 I've solved my problem. Thanks "Jeremy Suiter" <jeremy.suiter@rendallandrittner.co.uk> wrote in message news:25635a27$6931d8e4$92477@news.alaska-software.com... > Hi > > I'm trying to put a test print job together that switches paper bins mid > job, but I'm having problems. > > Is it possible? > > My code is below. > > Thanks > > Jeremy > > start printing > oPrinter:startDoc() > oPrinter:setPaperBin(1) > > Page 1 > oPS:=XbpPresSpace():New() > aSize:=oPrinter:paperSize() > aSize:={aSize[5]-aSize[3], aSize[6]-aSize[4]} > oPS:Create(oPrinter, aSize, GRA_PU_LOMETRIC) > GraStringAt(oPS, {200,2600}, "Test Page 1") > oPS:configure() > > set paper bin and new page > oPrinter:newPage() > oPrinter:setPaperBin(3) > > Page 2 > oPS:=XbpPresSpace():New() > aSize:=oPrinter:paperSize() > aSize:={aSize[5]-aSize[3], aSize[6]-aSize[4]} > oPS:Create(oPrinter, aSize, GRA_PU_LOMETRIC) > GraStringAt(oPS, {200,2600}, "Test Page 2") > oPS:configure() > > end printing > oPrinter:endDoc() > > |