paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-01 14:07:42 +01:00
Code Issues Packages Projects Releases Wiki Activity

Menu designer: deleting a menu item in designer, refreshing object inspector

Browse Source 
git-svn-id: trunk@53832 -
This commit is contained in:
michl 2017-01-01 20:41:40 +00:00
parent da10ad0af2
commit 3b823338c4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
designer/menueditor.pp
View File

@ -922,9 +922,9 @@ begin
anExistingSI.Parent:=nil; anExistingSI.Parent:=nil;
box.RemoveComponent(anExistingSI); box.RemoveComponent(anExistingSI);
FreeAndNil(anExistingSI); FreeAndNil(anExistingSI);
FEditorDesigner.PropertyEditorHook.PersistentDeleting(TPersistent(mi)); FEditorDesigner.PropertyEditorHook.DeletePersistent(TPersistent(mi));
FEditorDesigner.PropertyEditorHook.Modified(mi);
FreeAndNil(mi); FreeAndNil(mi);
FEditorDesigner.PropertyEditorHook.PersistentDeleted;
FEditorDesigner.Modified; FEditorDesigner.Modified;
if (box.ShadowCount = 0) then if (box.ShadowCount = 0) then