Ver Mensaje Individual
  #6  
Antiguo 20-01-2016
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.040
Reputación: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
El error puede ser ocasionado por artículos que tienen precio cero. Y seguramente se produce aquí.
Código Delphi [-]
  z:= 0;
  a:= StrToInt(DbEdit2.Text);   //Iva
  b:= StrToInt(DbEdit3.Text);   //Otro_Imp
  c:= 1+((a+b)/100); //   Suma Impuestos
  d:= StrToInt(StringGrid1.Cells[5, StringGrid1.Row])* StrToInt(StringGrid1.Cells[4, StringGrid1.Row]); // Precio
  f:= d/c;
  z:= d-f;
Quiero decir que aparentemente el problema es según qué artículo se escoge, y no por la máquina donde se hace la prueba.
Responder Con Cita