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

Menueditor: Set parent of ShadowMenu earlier, otherwise it goes to a wrong place. Issue #30060.

Browse Source 
git-svn-id: trunk@52257 -
This commit is contained in:
juha 2016-04-29 10:55:18 +00:00
parent 8e9f6b65f5
commit 148d4cf069
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
designer/menueditor.pp
View File

@ -1891,11 +1891,13 @@ begin
GlobalDesignHook.AddHandlerObjectPropertyChanged(@OnObjectPropertyChanged); GlobalDesignHook.AddHandlerObjectPropertyChanged(@OnObjectPropertyChanged);
GlobalDesignHook.AddHandlerModified(@OnDesignerModified); GlobalDesignHook.AddHandlerModified(@OnDesignerModified);
GlobalDesignHook.AddHandlerRefreshPropertyValues(@OnDesignerRefreshPropertyValues); GlobalDesignHook.AddHandlerRefreshPropertyValues(@OnDesignerRefreshPropertyValues);
AutoSize := False;
Color := clBtnFace; Color := clBtnFace;
BorderStyle := bsNone; BorderStyle := bsNone;
Align := alClient; // Parent must be set before the Align property.
// Otherwise ShadowMenu goes on top of ButtonsGroupBox which is Top aligned.
Parent := aForm; Parent := aForm;
AutoSize := False;
Align := alClient;
finally finally
EnableAutoSizing; EnableAutoSizing;
end; end;