diff --git a/components/virtualtreeview/VTHeaderPopup.pas b/components/virtualtreeview/VTHeaderPopup.pas
index 86b100d765..4eea1f459d 100644
--- a/components/virtualtreeview/VTHeaderPopup.pas
+++ b/components/virtualtreeview/VTHeaderPopup.pas
@@ -191,7 +191,7 @@ begin
     if poResizeToFitItem in Self.Options then begin
       NewMenuItem := NewItem(sResizeToFit, 0, False, True, OnMenuItemClick, 0, cResizeToFitMenuItemName);
       Items.Add(NewMenuItem);
-      Items.Add(NewLine());
+      Items.Add(NewLineMI());
     end;//poResizeToFitItem
 
     // Add column menu items.
diff --git a/lcl/menus.pp b/lcl/menus.pp
index 3476627375..8d2ce87cd1 100644
--- a/lcl/menus.pp
+++ b/lcl/menus.pp
@@ -461,6 +461,7 @@ function NewItem(const ACaption: string; AShortCut: TShortCut;
                  AChecked, TheEnabled: Boolean; TheOnClick: TNotifyEvent;
                  hCtx: THelpContext; const AName: string): TMenuItem;
 function NewLineMI: TMenuItem;
+function NewLine: TMenuItem; deprecated 'Use function NewLineMI instead.';
 
 function StripHotkey(const Text: string): string;
 
@@ -615,6 +616,12 @@ begin
   Result.Caption := cLineCaption;
 end;
 
+function NewLine: TMenuItem;
+// Deprecated because the name clashes with so many variables around Lazarus code.
+begin
+  Result := NewLineMI;
+end;
+
 function StripHotkey(const Text: string): string;
 var
   I, R: Integer;