diff --git a/components/virtualtreeview-new/branches/4.8/VirtualTrees.pas b/components/virtualtreeview-new/branches/4.8/VirtualTrees.pas
index 921270953..afb095214 100644
--- a/components/virtualtreeview-new/branches/4.8/VirtualTrees.pas
+++ b/components/virtualtreeview-new/branches/4.8/VirtualTrees.pas
@@ -10007,6 +10007,7 @@ begin
               Menu.PopupComponent := Treeview;
               P := Treeview.ClientToScreen(Point(XPos, YPos));
               Menu.Popup(P.X, P.Y);
+              Message.Result := 1;
               HandleMessage := True;
             end;
           end;
diff --git a/components/virtualtreeview-new/trunk/VirtualTrees.pas b/components/virtualtreeview-new/trunk/VirtualTrees.pas
index 0696d3512..0d9e4bd56 100644
--- a/components/virtualtreeview-new/trunk/VirtualTrees.pas
+++ b/components/virtualtreeview-new/trunk/VirtualTrees.pas
@@ -10566,6 +10566,7 @@ begin
               P := Treeview.ClientToScreen(Point(XPos, YPos));
               Menu.Popup(P.X, P.Y);
               HandleMessage := True;
+              Message.Result := 1;
             end;
           end;
         end;