diff --git a/designer/menueditor.pp b/designer/menueditor.pp
index 9eba6a96d8..d936566642 100644
--- a/designer/menueditor.pp
+++ b/designer/menueditor.pp
@@ -96,6 +96,7 @@ type
     constructor CreateWithBoxAndItem(aSMenu: TShadowMenu; aParentBox: TShadowBox;
       aRealItem: TMenuItem);
     function GetWidth: integer; override;
+    procedure Invalidate; override;
   public
     property BottomFake: TFake read GetBottomFake write FBottomFake;
     property IsInMenuBar: boolean read GetIsInMenuBar;
@@ -2120,6 +2121,20 @@ begin
     Result:=w + Double_DropDown_Text_Offset + GetShortcutWidth + Add_Icon_Width;
 end;
 
+procedure TShadowItem.Invalidate;
+var
+  OldHeight, NewHeight: Integer;
+begin
+  OldHeight := Height;
+  NewHeight := GetHeight;
+  if OldHeight <> NewHeight then
+  begin
+    Height := NewHeight;
+    FParentBox.LocateShadows;
+  end;
+  inherited Invalidate;
+end;
+
 function TShadowItem.HasChildBox(out aChildBox: TShadowBoxBase): boolean;
 begin
   aChildBox:=nil;