DELPHI AREA Forum

Hello.
I use your (great) TPrintPreview in one of my application. I want to print a label for CD and CD case.
The printing must have 12cm but I allways get a smaller printing that should be (11.9cm instead of 12cm).

const
LenghtC1 := 12000 ;
HeightC1 := 12000 ;
PaperA4_H= 21000 ;
...

begin
...
PrintPreview.Zoom:= 100;
PrintPreview.FastPrint:= False;
with PrintPreview do
begin
Units:= TUnits(mmhiMetric);
UsePrinterOptions:= True;
Canvas.Rectangle(c1);
...
end;
end;


the bigger rectangle is, the bigger error is.
can you help me?

Sorry, I have no printer to check it out.

But it possible to be from the VCL or could be an error from the printer?

There is more: I want to print an image over a sticky (glued) paper for a CD label.
My printer never print the image at correct location. Every time the printing is shifted 0-1.5 cm to the left or right or up or down.
But this could be from printer, I know.

There is a solution for this situation?


Keep working at this good VCL !

It could be also because of the printer's driver.