diff --git a/lcl/interfaces/cocoa/cocoagdiobjects.pas b/lcl/interfaces/cocoa/cocoagdiobjects.pas index a8acef056a..51af36dd6d 100644 --- a/lcl/interfaces/cocoa/cocoagdiobjects.pas +++ b/lcl/interfaces/cocoa/cocoagdiobjects.pas @@ -527,7 +527,7 @@ begin FSize := Round(NSFont.systemFontSize); end else - FSize := ALogFont.lfHeight; + FSize := Abs(ALogFont.lfHeight); // create font attributes Win32Weight := ALogFont.lfWeight; @@ -543,7 +543,7 @@ begin Attributes := NSDictionary.dictionaryWithObjectsAndKeys( NSStringUTF8(FName), NSFontFamilyAttribute, - NSNumber.numberWithFloat(ALogFont.lfHeight), NSFontSizeAttribute, + NSNumber.numberWithFloat(FSize), NSFontSizeAttribute, nil); Descriptor := NSFontDescriptor.fontDescriptorWithFontAttributes(Attributes);