paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-13 11:39:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazEdit: fixed array size for fontstyles. Issue #41591

Browse Source
This commit is contained in:
Martin 2025-04-14 10:43:10 +02:00
parent 9e823adba9
commit 8d90204cab
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazedit/lazedittextgridpainter.pas
View File

@ -37,7 +37,7 @@ type
TLazEditTextGridPainterFontInfo = class(TRefCountedObject) TLazEditTextGridPainterFontInfo = class(TRefCountedObject)
strict private const strict private const
HIGH_ORD_FONTSTYLES = (1 << ord(High(TFontStyle)) ); HIGH_ORD_FONTSTYLES = (2 << ord(High(TFontStyle)) ) - 1;
strict private type strict private type
TLazEditTextGridPainterFontStyleInfo = record TLazEditTextGridPainterFontStyleInfo = record
Font: TFont; Font: TFont;