Ich möchte momentan aber lieber bei dsPDF bleiben und testen
Das Problem beí mir, ich kann nicht mein Bild (A4) auf Printpreviiew komplett strecken
Ich habe folgendes gemacht :
Delphi-Quellcode:
procedure TForm2.DrawImageOnlyPage;
var
PR: TRect;
OneCM: TPoint;
begin
with PrintPreview do
begin
OneCM := PointFrom(mmLoMetric, 100, 100);// einheiten in cm
// PR := PageBoundsAfterMargin;
PR.Left := 0;
PR.Top := 0;
PR.Right := 21 * OneCM.X;
PR.Bottom := 29 * OneCM.Y;
PaintGraphicEx(PR, Form1.Image1.Picture.Graphic, True, False, True);
end;
end;
Der Rectangle PR kommt beim aus drucken kleiner als A4 etwa 18 cm Breit statt 21 cm
Mein Bild beim Ausdrucken kommt auch soweit von dem Rand
Fast 2,5 cm Links statt 0,2 cm
Fast 2,3 cm von Oben statt 0,2 cm
Woran liegt es ?