diff --git a/components/tparadoxdataset/lazparadox.lpk b/components/tparadoxdataset/lazparadox.lpk
index a003fa485..2441eccd7 100644
--- a/components/tparadoxdataset/lazparadox.lpk
+++ b/components/tparadoxdataset/lazparadox.lpk
@@ -1,18 +1,15 @@
 <?xml version="1.0"?>
 <CONFIG>
-  <Package Version="2">
+  <Package Version="3">
     <PathDelim Value="\"/>
     <Name Value="lazparadox"/>
     <Author Value="Christian Ulrich"/>
     <CompilerOptions>
-      <Version Value="5"/>
+      <Version Value="8"/>
       <PathDelim Value="\"/>
       <SearchPaths>
         <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
       </SearchPaths>
-      <CodeGeneration>
-        <Generate Value="Faster"/>
-      </CodeGeneration>
       <Other>
         <CompilerPath Value="$(CompPath)"/>
       </Other>
@@ -27,7 +24,8 @@
         <UnitName Value="paradoxreg"/>
       </Item1>
       <Item2>
-        <Filename Value="paradox.pas"/>
+        <Filename Value="paradoxds.pas"/>
+        <UnitName Value="paradoxds"/>
       </Item2>
     </Files>
     <Type Value="RunAndDesignTime"/>
diff --git a/components/tparadoxdataset/paradox.pas b/components/tparadoxdataset/paradoxds.pas
similarity index 99%
rename from components/tparadoxdataset/paradox.pas
rename to components/tparadoxdataset/paradoxds.pas
index c6c04f94a..a1fa0211b 100644
--- a/components/tparadoxdataset/paradox.pas
+++ b/components/tparadoxdataset/paradoxds.pas
@@ -1,4 +1,4 @@
-unit paradox;
+unit paradoxds;
 
 { TParadoxdataSet
   Christian Ulrich christian@ullihome.de
@@ -356,7 +356,7 @@ begin
     begin
       case F^.fType of
       pxfAlpha:    Fielddefs.Add(StrPas(FNamesStart),ftString,F^.fSize);
-      pxfDate:     Fielddefs.Add(StrPas(FNamesStart),ftDate,F^.fSize);
+      pxfDate:     Fielddefs.Add(StrPas(FNamesStart),ftDate,0);
       pxfShort:    Fielddefs.Add(StrPas(FNamesStart),ftSmallInt,F^.fSize);
       pxfLong:     Fielddefs.Add(StrPas(FNamesStart),ftInteger,F^.fSize);
       pxfCurrency: Fielddefs.Add(StrPas(FNamesStart),ftFloat,F^.fSize);
diff --git a/components/tparadoxdataset/paradoxreg.pas b/components/tparadoxdataset/paradoxreg.pas
index 54195c3d6..d61c2040e 100644
--- a/components/tparadoxdataset/paradoxreg.pas
+++ b/components/tparadoxdataset/paradoxreg.pas
@@ -5,7 +5,7 @@ unit paradoxreg;
 interface
 
 uses
-  Classes, SysUtils, LResources, Paradox, LazarusPackageIntf, PropEdits;
+  Classes, SysUtils, LResources, Paradoxds, LazarusPackageIntf, PropEdits;
 
 resourcestring
   dbfsAllparadoxfiles = 'Paradox Files';
@@ -35,7 +35,7 @@ end;
 
 procedure Register;
 begin
-  RegisterUnit('paradox',@RegisterUnitParadox);
+  RegisterUnit('paradoxds',@RegisterUnitParadox);
 end;
 
 initialization