pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

tvplanit: Fix crash in print format editor when print format control is not on form.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8534 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2022-10-11 15:43:43 +00:00
parent 35e35ca544
commit 9f05d1ba41
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
components/tvplanit/source/vpprtfmt.pas
View File

@ -1586,7 +1586,10 @@ var
itGanttView : RenderControl := TVpLinkableControl(FGanttView); itGanttView : RenderControl := TVpLinkableControl(FGanttView);
end; end;
if FOwner is TVpControlLink then if FOwner is TVpControlLink then
begin
RenderControl.ControlLink := (FOwner as TVpControlLink);
RenderControl.DataStore := (FOwner as TVPControlLink).DataStore; RenderControl.DataStore := (FOwner as TVPControlLink).DataStore;
end;
end; end;
if Assigned(RenderControl) then if Assigned(RenderControl) then