diff --git a/components/tvplanit/source/vpprtfmt.pas b/components/tvplanit/source/vpprtfmt.pas
index e4eec2c7c..6df3d547b 100644
--- a/components/tvplanit/source/vpprtfmt.pas
+++ b/components/tvplanit/source/vpprtfmt.pas
@@ -83,7 +83,7 @@
 }
 
 {$I vp.inc}
-{$DEFINE DEBUG_VP_PRINTER}
+{.$DEFINE DEBUG_VP_PRINTER}
 
 unit VpPrtFmt;
 
diff --git a/components/tvplanit/source/vptasklistpainter.pas b/components/tvplanit/source/vptasklistpainter.pas
index 1508d6e97..4b8f7da25 100644
--- a/components/tvplanit/source/vptasklistpainter.pas
+++ b/components/tvplanit/source/vptasklistpainter.pas
@@ -1,12 +1,12 @@
 unit VpTasklistPainter;
 
 {$I vp.inc}
-{$DEFINE DEBUG_VP_TASKLISTPAINTER}
+{.$DEFINE DEBUG_VP_TASKLISTPAINTER}
 
 interface
 
 uses
-  {$IFDEF DEBUG_VP_TASKLISTPAINTER}LazLogger{$ENDIF},
+  {$IFDEF DEBUG_VP_TASKLISTPAINTER}LazLogger,{$ENDIF}
   SysUtils, LCLType, LCLIntf,
   Classes, Graphics, Types,
   VpConst, VpBase, VpTaskList, VpBasePainter;