problemas con "comas" en sql interbase

[darkbits]

un saludo a todo el club
estoy trabajando en ID6 con interbase 6
tengo la tabla TC
dolar_tc tipo decimal(15,2)
impuesto_tc tipo decimal(15,2)

mi problema es que quiero tipear con COMA edit1.text = 5,8 y edit2.text= 11,2
mi base de datos se actualiza a:
dolar_tc = 58,00
impuesto_tc= 112,00
tipeo con (,) y no llega a diferenciar la (,) en la DB

y tipeo con PUNTO edit1.text = 5.8 y edit2.text= 11.2
a mi base de datos se actualiza a:
dolar_tc = 5,8
impuesto_tc= 11,2
tipeo con (.) y SI llega a diferenciar la (,) en la DB

yo necesito tipear los valores del edit con COMA y que se guarde en la DB con COMA

esta es mi consulta que estoy realizando por favor si hay algo q modificar para lo que requiero.

Código SQL [-]
_DM.consulta1.close;
    _DM.consulta1.SQL.Text:='update TC set dolar_tc ='+QuotedStr(edit1.text)+',impuesto_tc='+QuotedStr(edit2.text)+'where id_tc =1';
    _DM.consulta1.ExecSQL;
    _DM.consulta1.UpdateCursorPos;
    _DM.consulta1.UpdateStatus;
    _DM.consulta1.Close;
    _DM.consulta1.Active:= false;

gracias

[defcon1_es]

Buenos días.

Te recomiendo el uso de parámetros para evitar este tipo de problemas:

Código Delphi [-]
_DM.consulta1.close; 
_DM.consulta1.SQL.Text:='update TC set dolar_tc =:auxdolar_tc,impuesto_tc=:auximpuesto_tc where id_tc =1';
_DM.consulta1.ParamByName('auxdolar_tc').AsFloat := StrToFloat(edit1.text);
_DM.consulta1.ParamByName('auximpuesto_tc').AsFloat := StrToFloat(edit2.text); 
_DM.consulta1.ExecSQL; _DM.consulta1.UpdateCursorPos; 
_DM.consulta1.UpdateStatus; 
_DM.consulta1.Close; 
_DM.consulta1.Active:= false;

[darkbits]

si funciono gracias