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

TAChart: Fix occasional crash when Styles are used for series but style list is empty.

Browse Source
This commit is contained in:
wp_xyz 2024-02-08 13:05:03 +01:00
parent e5ba0c58f1
commit 8801ff314b
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/tachart/tacustomseries.pas
View File

@ -1565,7 +1565,7 @@ begin
then begin
if Styles <> nil then begin
style := Styles.StyleByIndex(si);
if style.UseFont then
if (style <> nil) and style.UseFont then
Marks.LabelFont.Assign(style.Font)
else
Marks.LabelFont.Assign(lfont);