Código Delphi [-]... TuDataSet.FieldByName('tucampo').ValidChars := ['0'...'9','.']; ...
... TuDataSet.FieldByName('tucampo').ValidChars := ['0'...'9','.']; ...