瀏覽代碼

* added patch from mantis #19226 as far as not already committed as part of
#20451. This commit only adds ftfixedchar to the case, but since its
behaviour is the same as default, no noticable differences.

git-svn-id: trunk@19487 -

marco 14 年之前
父節點
當前提交
e13a6d9999
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      packages/fcl-db/src/memds/memds.pp

+ 1 - 0
packages/fcl-db/src/memds/memds.pp

@@ -974,6 +974,7 @@ begin
               F1:=TField(L1[i]);
               F1:=TField(L1[i]);
               F2:=TField(L2[I]);
               F2:=TField(L2[I]);
               Case F1.DataType of
               Case F1.DataType of
+                ftFixedChar,
                 ftString   : F1.AsString:=F2.AsString;
                 ftString   : F1.AsString:=F2.AsString;
                 ftBoolean  : F1.AsBoolean:=F2.AsBoolean;
                 ftBoolean  : F1.AsBoolean:=F2.AsBoolean;
                 ftFloat    : F1.AsFloat:=F2.AsFloat;
                 ftFloat    : F1.AsFloat:=F2.AsFloat;