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

TAChart: Fix potentially unbalanced sequence of Dataset.DisableControls and .EnableControls in TDbChartSource (https://forum.lazarus.freepascal.org/index.php/topic,70019.msg545153/topicseen.html)

Browse Source
This commit is contained in:
wp_xyz 2025-01-28 23:25:37 +01:00
parent 67ff91cf1f
commit 8ef40e37d5
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/tadbsource.pas
View File

@ -146,8 +146,8 @@ procedure TDbChartSource.AfterDraw;
begin
inherited AfterDraw;
try
if not FDataLink.Active or (FBookmark = nil) then exit;
FDataLink.Dataset.EnableControls;
if not FDataLink.Active or (FBookmark = nil) then exit;
FDataLink.DataSet.GotoBookmark(FBookmark);
FDataLink.DataSet.FreeBookmark(FBookmark);
finally