font.size - font.height - Negative Werte - Schlechte Doku

[Thomasl]

Font über Size einstellen macht bei HiDPI nur Probleme

Delphi-Quellcode:

function FontHeightDpi(const Size: Integer; const Dpi: Integer): Integer;
begin
  Result := -MulDiv(Size, Dpi, 72);
end;


Function TFormFontTest1.PaintTextToCanvas(const aCanvas:TCanvas;const aX:Integer;const aY:Integer;const aSize:Integer;const aText:String): TRect;
begin
  aCanvas.font.Height := FontHeightDpi(aSize, PixelsPerInch);

...

[bernau]

Zitat von Thomasl:

Font über Size einstellen macht bei HiDPI nur Probleme

Das kommt noch hinzu. Ist aber eher einem Bug bei Font.PixelsPerInch geschuldet, welches ja zur Berechnung zwischen Font.Height und Font.Size verwendet wird.