Browse Source

* fix for twordfield=tlongintfield (bug 8500)

git-svn-id: trunk@6780 -
marco 18 years ago
parent
commit
e52a4e3b9f
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fcl-db/src/db.pas

+ 1 - 1
packages/fcl-db/src/db.pas

@@ -1786,7 +1786,7 @@ const
       { ftString} TStringField,
       { ftSmallint} TSmallIntField,
       { ftInteger} TLongintField,
-      { ftWord} TLongintField,
+      { ftWord} TWordField,
       { ftBoolean} TBooleanField,
       { ftFloat} TFloatField,
       { ftCurrency} TCurrencyField,