Browse Source

fcl-db: bufdataset: cosmetic (TAutoIncField is descendant of TLongIntField)

git-svn-id: trunk@39240 -
lacak 7 years ago
parent
commit
935af781e4
1 changed files with 2 additions and 2 deletions
  1. 2 2
      packages/fcl-db/src/base/bufdataset.pas

+ 2 - 2
packages/fcl-db/src/base/bufdataset.pas

@@ -1574,9 +1574,9 @@ begin
                  ftBoolean  : F1.AsBoolean:=F2.AsBoolean;
                  ftFloat    : F1.AsFloat:=F2.AsFloat;
                  ftAutoInc,
-                 ftLargeInt : F1.AsLargeInt:=F2.AsLargeInt;
-                 ftSmallInt : F1.AsInteger:=F2.AsInteger;
+                 ftSmallInt,
                  ftInteger  : F1.AsInteger:=F2.AsInteger;
+                 ftLargeInt : F1.AsLargeInt:=F2.AsLargeInt;
                  ftDate     : F1.AsDateTime:=F2.AsDateTime;
                  ftTime     : F1.AsDateTime:=F2.AsDateTime;
                  ftTimestamp,