Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   Problema al crear un DBF (https://www.clubdelphi.com/foros/showthread.php?t=66720)

jpgonzalez 09-03-2010 13:41:33

Problema al crear un DBF
 
Buenos dias para todos...
Esta es mi primer participacón en el foro, asi que si le pifio en algo sepan disculpar...

Le comento el problema que tengo...
Trabajo con Delphi 5 y SQL 2000, y tengo que crear un DBF con los datos que traigo de una Query.

Para esto tengo una tabla (TTable) a la cual le fue agregando los campos, con el "new field" y definiendo los tipos para cada uno de ellos.
Lo que me pasa es que a campos que tengo definidos como Float en la Table, y a los cuales le asigno un Float (lo veo haciendo el debug del codigo), luego al abrir el DBF los veo como si fueran Integer...
Es decir, si al campo NETO21 le asigno 28,42 en el DBF me guarda 28... Si a NETO21 le asigno 28.58 me guarda 29 (redondea).

Parte el código es:
TCompras.FieldByName('IVA21').AsFloat:=QryExportacionComprasCatedraliva.value;
TCompras.FieldByName('NETO21').AsFloat:=QryExportacionComprasCatedralneto.value;

TCompras es la tabla, y QryExportacionComprasCatedral es la Query.
Al hacer el debug, veo que a ambos lados de la igualdas dice 28,42, pero luego cuando abro el DBF en el campo NETO21 dice 28.

Si en lugar de crear un DBF creo un DB, me guarda los decimales perfectamente.

Bue, no se si me explique bien... desde ya muchas gracias, Juan

jpgonzalez 21-03-2010 04:14:50

Hola a todos, ya le encontre la vuelta a esto.
La solucion es crear el DBF con el Database Desktop, asignar bien los campos con la longitud y cantidad de decimales correspondiente.


La franja horaria es GMT +2. Ahora son las 09:08:26.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi