"floating point division by zero" En unas maquinas si en unas maquinas no

[Casimiro Noteví]

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.