Bueno, no dices qué error te da pero en principio no puedes hacer un FloatToStr de un valor tipo string así que tendrías que poner lo siguiente:
Código Delphi
[-]
ADOQuery1.SQL.Add('Set ta_valor= '+Edit1.Text);
teniendo en cuenta que el valor que tengas en Edit1 no tenga comas de miles y valor decimal sea un punto.
Saludos