浏览代码

+ Size should be 0 for integer and float fields (fix bug #4122)

git-svn-id: trunk@1567 -
joost 20 年之前
父节点
当前提交
68dca23994
共有 1 个文件被更改,包括 0 次插入8 次删除
  1. 0 8
      fcl/db/fields.inc

+ 0 - 8
fcl/db/fields.inc

@@ -42,14 +42,6 @@ begin
   FSize:=ASize;
   FRequired:=ARequired;
   FPrecision:=-1;
-  // Correct sizes.
-  If FDataType=ftFloat then
-    begin
-    If Not (FSize in [4,8,10]) then FSize:=10
-    end
-  else If FDataType in [ftWord,ftsmallint,ftinteger] Then
-    If Not (byte(FSize) in [1,2,4]) then FSize:=4;
-
   FFieldNo:=AFieldNo;
 end;