value out of bounds

[__cadetill]

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