UPDATE con reales

[taru]

Hola tengo un problemilla y llevo dandole vueltas toda la tarde. El problema es este query que se ejecuta bien osea funciona, pero el hijo de su madre me mete integer en las columnas ptotal, pagado y debe que por supuesto son float.

Código Delphi [-]
query.SQL.Text := 'UPDATE ' + bdticket + ' SET  ptotal = ' + quotedstr(ptotal.caption) + ' , pagado=' + quotedstr(editentrega.Text) + ' , debe=' + quotedstr(floattostr(resto)) + ' WHERE id=' + quotedstr(inttostr(idcabecera));

y no hay manera. He imprimido en pantalla el query ya evaluado y me sale:

Código SQL [-]
UPDATE ticket SET ptotal='27,46', pagado='10,28', debe='17,18' WHERE id='492'

Creo que esta todo bien pero en este caso me updatea 27, 10 y 17 respectivamente.

Alguien sabe porque?

PD: Los campos de la tabla mysql son float.
Gracias por adelantado.