+ Initialized ValidChars and Precision in FloatField

git-svn-id: trunk@120 -

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;