forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

docking, initialize a `var` parameter used as result 

it's not `out` so there is no guarantee that the caller
has initialized it.
This commit is contained in:
Basile Burg 2023-02-25 13:32:55 +01:00
parent 7398bf9609
commit b4ae83569f
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/u_main.pas
View File

@ -1620,6 +1620,7 @@ procedure TMainForm.anchorDockingAddControlEvent(Sender: TObject; aName: string;
var AControl: TControl; DoDisableAutoSizing: boolean); var AControl: TControl; DoDisableAutoSizing: boolean);
var w : TDexedWidget; var w : TDexedWidget;
begin begin
AControl := nil;
for w in fWidgList do for w in fWidgList do
if w.name = aName then if w.name = aName then
begin begin