Nun da Rolepdf die Bildschirmauflösung und nicht die Druckerauflösung nutzt, wundert mich da zunächst nichts:
Delphi-Quellcode:
procedure TRolePDF.SetPageSize(Value: TPageSize);
const
PixelsPerInch = 72;
begin
FPageSize := Value;
case Value of
psA4: begin PageWidth := round(8.26 * PixelsPerInch); PageHeight := round(11.69 * PixelsPerInch); end;
psLetter: begin PageWidth := round(8.5 * PixelsPerInch); PageHeight := round(11 * PixelsPerInch); end;
psLegal: begin PageWidth := round(8.5 * PixelsPerInch); PageHeight := round(14 * PixelsPerInch); end;
end;
end;
Das mag meistens klappen, aber ich halte das nicht für optimal.
Gruß
K-H