paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 01:19:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

CustomDrawn: Fix font height issue. Patch by lagprogrammin (https://forum.lazarus.freepascal.org/index.php/topic,62849.msg475824.html#msg475824)

Browse Source
This commit is contained in:
wp_xyz 2023-03-31 20:02:24 +02:00
parent 454f272551
commit 90ea7941f6
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/interfaces/customdrawn/customdrawnwinapi.inc
View File

@ -528,6 +528,7 @@ begin
);*) );*)
lFont.Size := Abs(LogFont.lfHeight); lFont.Size := Abs(LogFont.lfHeight);
lFont.ftFont.SizeInPoints := lFont.Size;
(* // Some values at available on Qt documentation at a table (* // Some values at available on Qt documentation at a table
// Others are guesses. The best would be to test different values for those // Others are guesses. The best would be to test different values for those