diff --git a/components/tvplanit/source/vpdayview.pas b/components/tvplanit/source/vpdayview.pas
index 93a2e4093..69828cd11 100644
--- a/components/tvplanit/source/vpdayview.pas
+++ b/components/tvplanit/source/vpdayview.pas
@@ -418,7 +418,7 @@ type
       UseGran: TVpGranularity);
     procedure PaintToCanvas (ACanvas: TCanvas; ARect: TRect; Angle: TVpRotationAngle;
       ADate: TDateTime; StartHour, EndHour: TVpHours; UseGran: TVpGranularity);
-    procedure RenderToCanvas (RenderCanvas: TCanvas; RenderIn: TRect;
+    procedure RenderToCanvas(RenderCanvas: TCanvas; RenderIn: TRect;
       Angle: TVpRotationAngle; Scale: Extended; RenderDate: TDateTime;
       StartLine, StopLine: Integer; UseGran: TVpGranularity; DisplayOnly: Boolean); override;
 
diff --git a/components/tvplanit/source/vpdayviewpainter.pas b/components/tvplanit/source/vpdayviewpainter.pas
index d9c0d66f3..cc5eac43d 100644
--- a/components/tvplanit/source/vpdayviewpainter.pas
+++ b/components/tvplanit/source/vpdayviewpainter.pas
@@ -305,10 +305,8 @@ begin
   // Initialize the rectangle to be used for all-day events
   ADEventsRect := InitAllDayEventsRect;
 
-  {
   if (FDayView.DataStore = nil) or (FDayView.DataStore.Resource = nil) then
     Exit;
-  }
 
   // Collect all of the events for this range and determine the maximum
   // number of all day events for the range of days covered by the control.