+ Version 6.4.5

git-svn-id: trunk@628 -

fcl/db/dbase/dbf_common.inc

@@ -3,6 +3,10 @@
 
 {.$define USE_CACHE}
 
+// modifies unix unit dbf_wtil to use hungarian encodings (hack)
+
+{.$define HUNGARIAN}
+
 // enables assembler routines, 486+ only
 
 {$define USE_ASSEMBLER_486_UP}
@@ -35,15 +39,15 @@
 //------------------------------------------------------
 
 
-{$ifdef VER80}          //      Delphi 1.0
+{$ifdef VER80}          //	Delphi 1.0
   #ERROR tDbf needs Delphi or C++ Builder 3 minimum.
 {$endif}
 
-{$ifdef VER90}          //       Delphi 2.0
+{$ifdef VER90}          //	 Delphi 2.0
   #ERROR tDbf needs Delphi or C++ Builder 3 minimum.
 {$endif}
 
-{$ifdef VER93}          //       is BCB++ 1.0
+{$ifdef VER93}          //	 is BCB++ 1.0
   #ERROR tDbf needs Delphi or C++ Builder 3 minimum.
 {$endif}
 
@@ -107,6 +111,26 @@
   {$define DELPHI_3}
 {$endif}
 
+{$ifdef VER160} // Delphi 8
+  {$define DELPHI_2005}
+  {$define DELPHI_8}
+  {$define DELPHI_7}
+  {$define DELPHI_6}
+  {$define DELPHI_5}
+  {$define DELPHI_4}
+  {$define DELPHI_3}
+{$endif}
+
+{$ifdef VER170} // Delphi 2005
+  {$define DELPHI_2005}
+  {$define DELPHI_8}
+  {$define DELPHI_7}
+  {$define DELPHI_6}
+  {$define DELPHI_5}
+  {$define DELPHI_4}
+  {$define DELPHI_3}
+{$endif}
+
 //-------------------------------------------------------
 //--- Conclude supported features from delphi version ---
 //-------------------------------------------------------
@@ -128,6 +152,7 @@
   {$define SUPPORT_FIELDDEF_INDEX}
   {$define SUPPORT_FIELDTYPES_V4}
   {$define SUPPORT_UINT32_CARDINAL}
+  {$define SUPPORT_MATH_UNIT}
 
 {$ifdef DELPHI_5}
 
@@ -170,12 +195,12 @@
   {$define SUPPORT_INT64}
   {$define SUPPORT_DEFAULT_PARAMS}
   {$define SUPPORT_NEW_TRANSLATE}
-  {$define SUPPORT_BACKWARD_FIELDDATA}
   {$define SUPPORT_NEW_FIELDDATA}
   {$define SUPPORT_FIELDDEF_TPERSISTENT}
   {$define SUPPORT_FIELDTYPES_V4}
   {$define SUPPORT_UINT32_CARDINAL}
   {$define SUPPORT_REINTRODUCE}
+  {$define SUPPORT_MATH_UNIT}
 
   // FPC 1.0.x exceptions: no 0/0 support
   {$ifdef VER1_0}

fcl/db/dbase/dbf_struct.inc

@@ -53,7 +53,7 @@ type
     FieldOffset     : Integer;  // 12..15   only applicable to foxpro databases
     FieldSize       : Byte;     // 16
     FieldPrecision  : Byte;     // 17
-    FoxProFlags     : Byte;     // 18
+    FoxProFlags	    : Byte;	// 18
     Dummy2          : array[19..31] of Byte;
   end;
 //====================================================================

fcl/db/dbase/history.txt

@@ -32,6 +32,54 @@ BUGS & WARNINGS
 
 
 
+------------------------
+V6.4.5
+
+- fixed: index create string raises exception unknown type
+
+
+------------------------
+V6.4.4
+
+- fixed: delphi 3 does not have math unit
+- fixed: exception in opening causes double free (thx arioch)
+- fixed: copy precision for float fields
+- fixed: force create index file, if index does not exist yet
+- fixed: memory leak in TPagedFile.FBufferPtr
+- fixed: TDbf.GetFileNames crash, more robust (rep by arioch)
+- added: character conversion hungarian (from attila)
+- fixed: index creation for tablelevel 7, mdx type 3
+- fixed: remember cursor position when changing showdeleted setting
+- fixed: findrecord to sync cursor position; endless loop or forgot records
+- chang: added initializations to 0 to suppress delphi warnings
+
+
+------------------------
+V6.4.3
+
+- fixed: delphi 3 compilation; dynamic array of restructure info (rep by kjteng)
+- fixed: datetime index creation using delphi 4 (rep by agam)
+- fixed: storage of negative numbers in integer fields (rep by agam)
+- fixed: index corruption when opening, with emptytable (rep by arioch)
+- fixed: index corruption on regenerateindexes (rep by piotr)
+
+
+------------------------
+V6.4.2
+
+- fixed: overflow in storing float field data (large negative number) (thx madruga)
+- fixed: restructure/pack create MDX database desktop compatible;
+    write db filename in mdx header (rep by rusmonk)
+- fixed: freepascal objfpc mode compatibility fixes (still needs some @-ies)
+- fixed: upon TDbf.Delete, use internal editing/posting such that BeforeEdit
+    and other events are not fired; also fixes cursor position bug upon
+    deletion (rep by bura)
+- fixed: only use float fields (UseFloatFields) if int64 not supported
+- fixed: deleted records undeleted when using RestructureTable with
+    Pack=false (rep by scenes)
+- fixed: made (hopefully) all references to units lowercase, for kylix
+
+
 ------------------------
 V6.4.1