diff --git a/components/jvcllaz/examples/JvTimeFramework/tfmain.lfm b/components/jvcllaz/examples/JvTimeFramework/tfmain.lfm
index 320e90c69..5b7429bc0 100644
--- a/components/jvcllaz/examples/JvTimeFramework/tfmain.lfm
+++ b/components/jvcllaz/examples/JvTimeFramework/tfmain.lfm
@@ -57,10 +57,8 @@ object MainForm: TMainForm
         TimeBlockProps.SelBlockHdrAttr.Font.Color = clBlack
         TimeBlockProps.SelBlockHdrAttr.ParentFont = False
         TimeBlockProps.SelBlockHdrAttr.FrameColor = clBlack
-        ApptAttr.Color = clWhite
         ApptAttr.Font.Color = clWindowText
         ApptAttr.ParentFont = False
-        SelApptAttr.Color = clWhite
         SelApptAttr.Font.Color = clWindowText
         SelApptAttr.ParentFont = False
         HdrAttr.Font.Color = clWindowText
@@ -80,7 +78,6 @@ object MainForm: TMainForm
         SelFancyRowHdrAttr.TickColor = clBlack
         PrimeTime.StartTime = 0.333333333333333
         PrimeTime.EndTime = 0.708333333333333
-        PrimeTime.Color = clYellow
         GroupHdrAttr.Font.Color = clWindowText
         GroupHdrAttr.ParentFont = False
         GroupHdrAttr.FrameColor = clBlack
diff --git a/components/jvcllaz/examples/JvTimeFramework/tfmain.pas b/components/jvcllaz/examples/JvTimeFramework/tfmain.pas
index d64b0e06a..b5490296c 100644
--- a/components/jvcllaz/examples/JvTimeFramework/tfmain.pas
+++ b/components/jvcllaz/examples/JvTimeFramework/tfmain.pas
@@ -1,3 +1,6 @@
+// todo -cTJvTimeFramework: Remove small square at left/top corner of screen; assosciated with Days/Months/Weeks
+// todo -cTJvTimeFramework: Fix text height when printing text with font size 0
+
 {******************************************************************
 
                        JEDI-VCL Demo
diff --git a/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas b/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas
index 5004be360..2afd3e08f 100644
--- a/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas
+++ b/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas
@@ -677,7 +677,7 @@ type
     procedure Assign(Source: TPersistent); override;
     procedure ParentFontChanged; virtual;
   published
-    property Color: TColor read FColor write SetColor;
+    property Color: TColor read FColor write SetColor default clWindow;
     property Font: TFont read FFont write SetFont;
     property ParentFont: Boolean read FParentFont write SetParentFont default True;
     property FrameColor: TColor read FFrameColor write SetFrameColor default clBlack;
@@ -701,7 +701,7 @@ type
     constructor Create(AApptGrid: TJvTFDays);
     procedure Assign(Source: TPersistent); override;
   published
-    property Color: TColor read FColor write SetColor default clNavy;
+    property Color: TColor read FColor write SetColor default clHighlight;
     property FrameWidth: Integer read FFrameWidth write SetFrameWidth default 2;
     property Style: TJvTFSelCellStyle read FStyle write SetStyle default scsSolid;
   end;
@@ -3831,7 +3831,7 @@ begin
 
   FFrameWidth := 1;
   FFrameColor := clBlack;
-  FColor := clWhite;
+  FColor := clWindow;
 end;
 
 destructor TJvTFDaysApptAttr.Destroy;
@@ -3933,7 +3933,7 @@ begin
   inherited Create;
 
   FApptGrid := AApptGrid;
-  FColor := clNavy;
+  FColor := clHighlight;
   FStyle := scsSolid;
   FFrameWidth := 2;
 end;