diff --git a/components/tvplanit/source/vpdayview.pas b/components/tvplanit/source/vpdayview.pas
index ea232a4ac..0e875cb75 100644
--- a/components/tvplanit/source/vpdayview.pas
+++ b/components/tvplanit/source/vpdayview.pas
@@ -1688,6 +1688,10 @@ var
 begin
   inherited;
   dvClickTimer.Enabled := false;
+  dvMouseDownPoint := Point(0, 0);
+  dvMouseDown := false;
+  dvDragging := false;
+
   { if the mouse was pressed down in the client area, then select the cell. }
   if not focused then SetFocus;