浏览代码

* Fix bug #33869, wrong assignment in CopyFromDataset for largeint fields

git-svn-id: trunk@39237 -
michael 7 年之前
父节点
当前提交
e8f74fdbdb
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/fcl-db/src/base/bufdataset.pas

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

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