[Lazarus] Printing on Raspberry Pi
ahiggins
tony at plutus-systems.co.uk
Tue Apr 5 21:00:37 CEST 2016
Not sure if you resolved the missed align data error (im coming to the party
late), today i have had the same problem, now below is the crude mod i did
to get it working for me, not sure if it will help your problem but worth a
try.
LR_Prntr unit. around line 1042
// screen sizes
Pgw :=
round((PaperSize.PaperRect.PhysicalRect.Right-PaperSize.PaperRect.PhysicalRect.Left)
* kx);
//Pgw := round(PPgw * kx);
Pgh :=
round((PaperSize.PaperRect.PhysicalRect.Bottom-PaperSize.PaperRect.PhysicalRect.Top)
* ky);
//Pgh := round(PPgh * ky);
Ofx := round(PaperSize.PaperRect.WorkRect.Left * kx);
//Ofx := round(POfx * kx);
Ofy := round(PaperSize.PaperRect.WorkRect.Top * ky);
//Ofy := round(POfy * ky);
Pw :=
round((PaperSize.PaperRect.WorkRect.Right-PaperSize.PaperRect.WorkRect.Left)
* kx);
//Pw := round(PPw * kx);
Ph :=
round((PaperSize.PaperRect.WorkRect.Bottom-PaperSize.PaperRect.WorkRect.Top)
* ky);
//Ph := round(PPh * ky);
kind regards
Tony
--
View this message in context: http://free-pascal-lazarus.989080.n3.nabble.com/Lazarus-Printing-on-Raspberry-Pi-tp4045084p4048056.html
Sent from the Free Pascal - Lazarus mailing list archive at Nabble.com.
More information about the Lazarus
mailing list