Ingresar sólo decimales en un Edit

[noeres]

Hola, gracias por contestarme, lo que me sugeriste funciona. Ahora mi problema es otro:

Si ingreso el número decimal con punto, me tira error al intentar grabar en la tabla:

DM.TablaProductos.FieldByName('Peso').AsFloat := StrToFloat(EditPeso.Text);

si lo ingreso con punto, no me da error pero no graba en la tabla!

Y ya probé poniendo:

DM.TablaProductos.FieldByName('Peso').AsString := EditPeso.Text;

y también me da error... ¿Alguna idea?