Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   value out of bounds (https://www.clubdelphi.com/foros/showthread.php?t=10214)

merlin 13-05-2004 10:01:12

value out of bounds
 
hola buneas tengo oun problemilla y es q me da el error value out of bounds cuando ago lo siguiente:

table1.FieldByName('stockact').AsFloat:=((table1.fieldbyname('stockini').AsFloat)+(entrada.fieldbyna me('entradas').AsFloat)) - salida.fieldbyname('salidas').AsFloat;

el campo de la tabla es nuemrico 6/2 es una tabla de dbase5 alguien sabe xq? :confused: :(

merlin 13-05-2004 10:33:08

mas sobre value out of bouns
 
un datelle q se me ha pasado por alto antes deciros q este proceso me funciona para la casi todos los articulos y para mas inrri en el articulo q me da error es uno en el q la operacion es

table1.FieldByName('stockact').AsFloat:=((table1.fieldbyname('stockini').AsFloat)+(entrada.fieldbyna me('entradas').AsFloat)) - salida.fieldbyname('salidas').AsFloat;

y los valores q tienen son ((0.6+540)-540.6) como puede ser q 0.0 de el error value out of bounds

:confused:

tcp_ip_es 13-05-2004 10:46:42

prueba a crearte una variable intermedia tipo double y asígnale el valor si esto no te da error pasa a asignarle al campo esa variable y si te salta ahi el problema estará en la definición del campo.


Saludos, Tony

merlin 13-05-2004 10:58:33

resp. tcp_ip_es
 
he exo lo siquiente e declarado

stock:double;


y luego he dejado la parte problematica asi:
stock:=((table1.fieldbyname('stockini').AsFloat)+(entrada.fieldbyname('entradas').AsFloat)) - salida.fieldbyname('salidas').AsFloat;
table1.FieldByName('stockact').AsFloat:=stock;

pero nada sigue el error. q puedo hacer mas?? :confused: :(

santana 13-05-2004 10:59:43

Hola, buneas.

Tengo oun problemilla couando intento leer heste ilo y es ke n oenteindo algounas palarbas.

tcp_ip_es 13-05-2004 11:07:33

cuando te da el error en la asignación a la variable o en la asignación al campo?



P.D. Que chispa tienes Santana :D

merlin 13-05-2004 12:10:30

en la asignacion al campo?

tcp_ip_es 13-05-2004 12:18:02

te pregunto que si el error te lo da en esta línea:
Código Delphi [-]
stock:=((table1.fieldbyname('stockini').AsFloat)
+(entrada.fieldbyname('entradas').AsFloat)) - salida.fieldbyname('salidas').AsFloat;
o en esta otra(que es donde la asignas al campo):
Código Delphi [-]
table1.FieldByName('stockact').AsFloat:=stock;

merlin 13-05-2004 12:39:38

resp. tcp_ip_es
 
lo de en la de la asignacion al campo y el error lo da xq cuando hace la operacion de la resta no la hace bien.

ent:=((table1.fieldbyname('stockini').AsFloat)+(entrada.fieldbyname('entradas').AsFloat));
sal:=salida.fieldbyname('salidas').AsFloat;

stock:=ent-sal;<-------hay!!

table1.FieldByName('stockact').AsFloat:=stock;

ej:

ent=(0.6+540)
ent=540.6

sal=540.6

stock=540.6-540.6 //al hacer esto da un valor muy raro.
stock=1.241570365e-13 //y claro esto es lo q hace q de el error ese de value out of bouns
xq el campo de la tabla es de (6parte entra,2parte decimal).

sabes xq hace la resta mal o q es lo q puede estar pasando??? :confused: :mad:

tcp_ip_es 13-05-2004 12:58:28

realmente no se que te puede estar pasando :confused: .

Declarate todos los campos de cada una de las tablas con el fieldeditor (botón derecho sobre el componente table->Field Editor.... y añadete todos los campos) después de haber hecho esto pon esta instrucción:

Código Delphi [-]
table1stockact.value:=((table1stockini.value)+(entradaentradas.value)) - salidasalidas.value;

Ya me dirás como te ha ido. ;)

Saludos, Tony

roman 13-05-2004 16:52:22

Cita:

Empezado por tcp_ip_es
P.D. Que chispa tienes Santana :D

Esta

:D

tcp_ip_es 14-05-2004 10:49:02

La verdad es que la gente es muy propensa a escribir como si de un móvil se tratase ;), con la cantidad de caracteres que te permite este peazo de foro je je je :D


Saludos, Tony

P.D. Y lo digo sin acritud eh!! ;)

merlin 14-05-2004 13:52:55

solucion
 
Al delphji se le va la piedra y cuando hace restas de dos cantidades iguales hay cantidades con las q las hace bien y otras no.
ej:

540.6-540.6 = 0 bueno segun el delphi es 1.10203E13 lo q hacia q en mi
tabla no entrara ese valor xq mi campo era 6/2.

tcp_ip_es 14-05-2004 14:51:44

Hiciste lo que te comente????
Cita:

Empezado por tcp_ip_es
realmente no se que te puede estar pasando :confused: .

Declarate todos los campos de cada una de las tablas con el fieldeditor (botón derecho sobre el componente table->Field Editor.... y añadete todos los campos) después de haber hecho esto pon esta instrucción:

Código Delphi [-]
table1stockact.value:=((table1stockini.value)+(entradaentradas.value)) - salidasalidas.value;

Ya me dirás como te ha ido. ;)

Saludos, Tony


__cadetill 14-05-2004 15:21:15

Para valores pequeños aconsejo usar el formato Currency. Te evitarás muchos problemas de estos

Código Delphi [-]
table1stockact.AsCurrency := ((table1stockini.AsCurrency) +
          (entradaentradas.AsCurrency)) - salidasalidas.AsCurrency;

PD: tcp_ip_es, podrías mirar de editar el mensaje 8 y poner un slto de linea para evitar el scroll horizontal? gracias :)

tcp_ip_es 14-05-2004 15:34:30

Eso esta hecho ;)

Saludos, Tony


La franja horaria es GMT +2. Ahora son las 06:31:13.

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