diff --git a/components/tvplanit/examples/datastores/sqlite3/unit1.lfm b/components/tvplanit/examples/datastores/sqlite3/unit1.lfm
index 22194d586..b5cb35b24 100644
--- a/components/tvplanit/examples/datastores/sqlite3/unit1.lfm
+++ b/components/tvplanit/examples/datastores/sqlite3/unit1.lfm
@@ -297,7 +297,6 @@ object Form1: TForm1
     Connection = SQLite3Connection1
     AutoConnect = False
     AutoCreate = False
-    Connected = False
     left = 136
     top = 192
   end
diff --git a/components/tvplanit/examples/datastores/xml/unit1.lfm b/components/tvplanit/examples/datastores/xml/unit1.lfm
index 04dc7cf43..4e0f099a6 100644
--- a/components/tvplanit/examples/datastores/xml/unit1.lfm
+++ b/components/tvplanit/examples/datastores/xml/unit1.lfm
@@ -164,8 +164,12 @@ object Form1: TForm1
           DrawingStyle = dsFlat
           EventDayStyle = []
           EventFont.Height = -12
+          HeadAttributes.Color = clBtnFace
           LineColor = clGray
           TimeFormat = tf12Hour
+          TodayAttributes.Color = clSilver
+          TodayAttributes.BorderPen.Color = clRed
+          TodayAttributes.BorderPen.Width = 3
           OffDayColor = clSilver
           SelectedDayColor = clRed
           ShowEvents = True
@@ -315,14 +319,8 @@ object Form1: TForm1
     EnableEventTimer = True
     PlayEventSounds = True
     AutoConnect = True
-    Connected = False
     FileName = 'data.xml'
     left = 136
     top = 202
   end
-  object XMLPropStorage1: TXMLPropStorage
-    StoredValues = <>
-    left = 222
-    top = 118
-  end
 end
diff --git a/components/tvplanit/examples/datastores/xml/unit1.pas b/components/tvplanit/examples/datastores/xml/unit1.pas
index f5973536c..43d09c589 100644
--- a/components/tvplanit/examples/datastores/xml/unit1.pas
+++ b/components/tvplanit/examples/datastores/xml/unit1.pas
@@ -36,7 +36,6 @@ type
     VpTaskList1: TVpTaskList;
     VpWeekView1: TVpWeekView;
     VpXmlDatastore1: TVpXmlDatastore;
-    XMLPropStorage1: TXMLPropStorage;
     procedure BtnNewResClick(Sender: TObject);
     procedure BtnEditResClick(Sender: TObject);
     procedure FormCreate(Sender: TObject);
diff --git a/components/tvplanit/examples/datastores/zteos/unit1.lfm b/components/tvplanit/examples/datastores/zteos/unit1.lfm
index fe5a8d54e..f34a7e02e 100644
--- a/components/tvplanit/examples/datastores/zteos/unit1.lfm
+++ b/components/tvplanit/examples/datastores/zteos/unit1.lfm
@@ -280,7 +280,6 @@ object Form1: TForm1
     PlayEventSounds = True
     AutoConnect = False
     AutoCreate = False
-    Connected = False
     left = 136
     top = 200
   end
diff --git a/components/tvplanit/source/addons/zeos/vpzeosds.pas b/components/tvplanit/source/addons/zeos/vpzeosds.pas
index fb3cee6e2..f26f1aeac 100644
--- a/components/tvplanit/source/addons/zeos/vpzeosds.pas
+++ b/components/tvplanit/source/addons/zeos/vpzeosds.pas
@@ -44,9 +44,9 @@ type
     property Connection: TZConnection read FConnection write SetConnection;
 
     // inherited
-    property AutoConnect;
-    property AutoCreate;
-    property Connected;
+    property AutoConnect default false;
+    property AutoCreate default false;
+    property Daybuffer;
   end;
 
 
diff --git a/components/tvplanit/source/vpbufds.pas b/components/tvplanit/source/vpbufds.pas
index ea72066f3..7f1456652 100644
--- a/components/tvplanit/source/vpbufds.pas
+++ b/components/tvplanit/source/vpbufds.pas
@@ -55,6 +55,7 @@ type
   published
     property AutoConnect;
     property AutoCreate;
+    property DayBuffer;
     property Directory: String read FDirectory write SetDirectory;
     property Persistent: Boolean read FPersistent write SetPersistent default true;
     property UseAutoIncFields: Boolean read FUseAutoInc write SetUseAutoInc default true;
diff --git a/components/tvplanit/source/vpinids.pas b/components/tvplanit/source/vpinids.pas
index 88c33088e..a23ce7df5 100644
--- a/components/tvplanit/source/vpinids.pas
+++ b/components/tvplanit/source/vpinids.pas
@@ -79,6 +79,7 @@ begin
   FFormatSettings.LongTimeFormat := 'hh:nn:ss';
   FFormatSettings.DateSeparator := '/';
   FFormatSettings.TimeSeparator := ':';
+  FDayBuffer := 1000*365;  // 1000 years, i.e. deactivate daybuffer mechanism
 end;
 
 destructor TVpIniDatastore.Destroy;
diff --git a/components/tvplanit/source/vpsqlite3ds.pas b/components/tvplanit/source/vpsqlite3ds.pas
index fc4dd2c0a..ec64154ec 100644
--- a/components/tvplanit/source/vpsqlite3ds.pas
+++ b/components/tvplanit/source/vpsqlite3ds.pas
@@ -50,7 +50,7 @@ type
     // inherited
     property AutoConnect;
     property AutoCreate;
-    property Connected;
+    property DayBuffer;
   end;
 
 var
diff --git a/components/tvplanit/source/vpxmlds.pas b/components/tvplanit/source/vpxmlds.pas
index beb6c5112..cf95d6d94 100644
--- a/components/tvplanit/source/vpxmlds.pas
+++ b/components/tvplanit/source/vpxmlds.pas
@@ -64,7 +64,6 @@ type
 
   published
     property AutoConnect default false;
-    property Connected;
     property FileName: String read FFileName write SetFileName;
     property ParentNode: String read FParentNode write SetParentNode;
 
@@ -209,6 +208,7 @@ begin
   FXmlSettings.LongTimeFormat := 'hh:nn:ss';
   FXmlSettings.DateSeparator := '/';
   FXmlSettings.TimeSeparator := ':';
+  FDayBuffer := 1000*365;  // 1000 years, i.e. deactivate daybuffer mechanism
 end;
 
 destructor TVpXmlDatastore.Destroy;