Foros Club Delphi - lectura medidor sistema distrib. de agua

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - lectura medidor sistema distrib. de agua (https://www.clubdelphi.com/foros/showthread.php?t=30863)

Gustavo Gowdak

20-04-2006 20:47:51

lectura medidor sistema distrib. de agua

Hola amigos, estoy realizando un sistema para distribucion de agua y tengo un inconveniente para el consumo agua en sierto caso, el medidor de agua es de de 6 digitos, y el consumo lo saco restando el consumo actual al anterior, hasta ahi no hay problema ahora si mi consumo anterior es 999952 y mi actual es 000014 me da resultado negativo, como soluciono este problema?????

seoane

20-04-2006 20:55:25

Se me ocurre algo como esto

Código:

function Restar(i,j: Integer): Integer;

begin

  if (i<j) then Result:= (i + 1000000) - j

    else Result:= i - j;

end;

Donde i es la lectura actual y j la anterior.

Gustavo Gowdak

20-04-2006 20:58:49

gracias, voy a probar

La franja horaria es GMT +2. Ahora son las 21:32:19.