diff --git a/fcl/db/fields.inc b/fcl/db/fields.inc index 403d6a225b..c6482ae6dc 100644 --- a/fcl/db/fields.inc +++ b/fcl/db/fields.inc @@ -1408,6 +1408,8 @@ constructor TFloatField.Create(AOwner: TComponent); begin Inherited Create(AOwner); SetDatatype(ftfloat); + FPrecision:=15; + FValidChars := [DecimalSeparator, '+', '-', '0'..'9', 'E', 'e']; end; Function TFloatField.CheckRange(AValue : Double) : Boolean;