diff --git a/packages/fcl-db/src/base/fields.inc b/packages/fcl-db/src/base/fields.inc
index fc3fb3e7b2..8e60196787 100644
--- a/packages/fcl-db/src/base/fields.inc
+++ b/packages/fcl-db/src/base/fields.inc
@@ -1696,7 +1696,7 @@ end;
 
 procedure TFloatField.SetPrecision(const AValue: Longint);
 begin
-  if AValue > 1 then
+  if (AValue = -1) or (AValue > 1) then
     FPrecision := AValue
   else
     FPrecision := 2;