Jon,

You can checkout the file lazarus\components\printers\design\sourceprinter.pas. It works for windows and linux.

Darius

----- Original Message ----- From: "Jon Foster" <[EMAIL PROTECTED]>
To: "lazarus" <[email protected]>
Sent: Saturday, February 10, 2007 8:35 PM
Subject: [lazarus] I can't print more than one page


Hi guys!

I am using FPC 2.0.4 (rpm from FPC) with Lazarus 0.9.20 (rpm from lazarus) on i386 Linux. I'm using the printers unit to produce a report. All works as expected on the first page. When I use the newpage() function to begin another page any use of the canvas.textout() function associated with my printer object fails to produce text. Yet canvas.LineTo() works. So on the second page all I get is lines without any text.

If I take out the newpage() call I get all of the text from my test pages overlapped on the same page. So I know my code is requesting the text output in the right places. If I EndDoc(), BeginDoc() then I get the consecutive pages albeit through a lot of print jobs. This doesn't work real well for me because I'm using my printers duplexing. Besides if the printer, which is networked, is busy then other jobs get injected between my pages.

In an attempt to get it to put text on the second page I've tried to canvas.MoveTo(0, 0) and reset my canvas.font.{name,size,color} properties. None of these things have actually produced text on the second page.

Help?

TIA-Jon

--
Jon Foster
JF Possibilities, Inc.
[EMAIL PROTECTED]
541-410-2760
Making computers work for you!

_________________________________________________________________
    To unsubscribe: mail [EMAIL PROTECTED] with
               "unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives

_________________________________________________________________
    To unsubscribe: mail [EMAIL PROTECTED] with
               "unsubscribe" as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives

Reply via email to