Numeric (12, 4) en Delphi 7

[oliverinf]

Hola a todos, les cuento mi situación: Uso Firebird 1.5, Delphi 7, IBX con el update.
En la base de datos tengo un dominio dPrecio que es Numeric(12, 4). Cuando agrego, en Delphi, en un TIBDataSet un campo de tipo dPrecio, me crea el campo como de tipo TFloatField y por lo que leí en la ayuda de Delphi debería crear un TFMTBCDField.
Mi problema es que tengo entendido que los campos BCD son más precisos que los campos Float.

Espero que alguien pueda darme alguna ayuda.

Desde ya muchas gracias.


Guillermo

[[Héctor Randolph]]

Hola Guillermo!

Tal vez se deba al dialecto que utilizas para el SQL, si utilizas el dialecto 1 seguramente te tomará los campos NUMERIC como TFloatField, sin embargo, si utilizas el dialecto 3 te tomará los campos como BCD,

Cuando creas una base de datos puedes definir el dialecto que vas a utilzar de la siguiente manera:

Código SQL [-]
  SET SQL DIALECT 3;
  CREATE DATABASE 'NUEVA.FDB' USER 'SYSDBA' PASSWORD 'masterkey'
  PAGE_SIZE 1024 DEFAULT CHARACTER SET NONE;

También en los componentes Delphi debes indicar el dialecto que utilizas.

Espero que te sea útil.

[oliverinf]

Desde ya muchas gracias por tu pronta respuesta.
El dialecto de la BD es el 3, en el componente de Delphi TIBDataBase también tengo el 3.
La única diferencia con la sentencia que me dices es que el character set yo lo tengo ISO8859_1, ¿podrá ser ese el problema?

[oliverinf]

Les cuento que creé la BD desde los metadatos y ahora funciona como debe ser.

Muchas gracias a todos!!!!

Guillermo