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

Thema durchsuchen

Ansicht

Themen-Optionen

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

Ein Thema von bernau · begonnen am 6. Dez 2022 · letzter Beitrag vom 7. Dez 2022

Vorheriger Beitrag

Nächster Beitrag

Thomasl

Registriert seit: 19. Jun 2006
Ort: Vreden
67 Beiträge

Delphi 11 Alexandria

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

6. Dez 2022, 13:39

Font über Size einstellen macht bei HiDPI nur Probleme

zusammenfalten · markieren

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);

...