Ausdruck ist kleiner als Vorschau :( Aber warum ?

[JoelH]

ich hab eine Vorschau auf dem Bildschirm, da kann man auch die FontSize einstellen. DIese übernehme ich dann auch für den Ausdruck, leider druckt der Drucker die Zeichen aber kleiner Warum nur ?

Die Programmdetails sind praktisch dieselben, einmal die Paintbox

Delphi-Quellcode:

paintbox1.canvas.font.name := aktfont;
       paintbox1.canvas.Pen.color := clCaptionText;
       fontsize := round(Main.aktuelleschriftgroesse/faktor);
       paintbox1.canvas.font.size := fontsize;
       fontheight := paintbox1.canvas.font.height;

und hier die Druckerroutine

Delphi-Quellcode:

Printer.canvas.font.name := aktfont;
  fontsize := round((Main.aktuelleschriftgroesse/faktor)*faktor2);
  Printer.canvas.font.size := fontsize;
  fontheight := Printer.Canvas.Font.Height;
  showmessage(IntToStr(fontheight));

faktor und faktor2 sind beide 1, also irrelevant. aktfont ist die der aktuelle Font.

Hat einer eine Idee woran es liegt ? Oder ist diese Ungenauigkeit einfach eine normale Begebenheit ?