SQL y coma decimal

[mjjj]

Hola amigos, una consulta...

Utilizo Delphi 2006 y Firebird 2.0
Intento almacenar un registro en una base de dato utilizando este codigo.

Código Delphi [-]
ibsql1.close;
ibsql1.sql.clear;
ibsql1.sql.add('insert into inventario (id, precio) values (:id, recio)')
ibsql1.parambyname('id').asstring:='001';
ibsql1.parambyname('precio').asstring:=currencyedit1.text;
ibsql1.execquery;

La tabla iventario esta definida como sigue:
id: varchar
precio: doubleprecision

El problema surge cuando intento almacenar un registro que el precio no es un numero entero sino por ejemplo: 123,456.

Lo que ocurre es que se me almacena un registro que en el campo precio tiene un valor de 123456... es como si la coma decimal desapareciera.

Porque ocurre esto??

Como lo soluciono??

Gracias