ich suche eine Möglichkeit DIN A3, A4 etc. und frei wählbare Formate auf einer Canvas darzustellen. Wie funktioniert die Umrechnung von Pixel in mm oder cm? ich finde da immer nur was mit dpi Abhängig

ich finde da immer nur was mit dpi Abhängig
Hartkern hat geschrieben:wie groß muss das Bitmap dann sein?
weil genau vor diesem Problem steh ich immer noch.
Ich weiß ja wie groß in echt A6, 5 ,4, SR4, 3, SR3 sind..
sprich Pixel pro mm? oder hol ich die mir über die Auflösung des Bildschirms?
function ScaleMM(mm: Double): Integer;
const
INCH = 25.4;
begin
Result := round(mm/INCH * Screen.PixelsPerInch);
end;
procedure TForm1.PaintboxPaint(Sender: TObject);
begin
with Paintbox1.Canvas do begin
Brush.Color := clWhite;
FillRect(0, 0, Paintbox1.Width, Paintbox1.Height);
Pen.Color := clBlack;
Rectangle(ScaleMM(20), ScaleMM(20), ScaleMM(30), ScaleMM(30));
end;
end;
Mitglieder in diesem Forum: 0 Mitglieder und 2 Gäste