diff --git a/X2UtPersistXML.pas b/X2UtPersistXML.pas
index 9553eb8..c403713 100644
--- a/X2UtPersistXML.pas
+++ b/X2UtPersistXML.pas
@@ -398,7 +398,8 @@ begin
 
         varSingle,
         varDouble,
-        varCurrency:
+        varCurrency,
+        varDate:
           value.float := AValue;
 
         varInt64: