Salve sto cercando di creare un calcolo , non trovo soluzione .
In pratica cliccando il pulsante il valore e corretto , cliccando nuovamente il pulsante mi calcola nuovamente il valore raddoppiando il valore , cliccando ancora triplica e cosi via . Vorrei che il valore sia calcolato una sola volta .

Il cosice e questo :

codice:
procedure Tdett_form.calcolaGiacenza;
var
scaricoTotale:extended;
begin
try
 Table1.DisableControls;
  scaricoTotale:=0;
  Table1.First;
    while notTable1.EOF do
    begin
      scaricototale:=scaricototale+Table1Scarico.Value; 
      Table1.Next;
    end;
    GiacenzaScarico.Edit;
     Giacenzascarico.Value:=Giacenzascarico.Value+scaricototale;
     Giacenza.Post;
     end;

finally
  Table1.enableControls;
end;
     end;

Il calcolo che viene fuori e corretto -
Cliccando nuovamente ricalcola mi calcola nuovamente tutto andando ad aggiungere nuovamente il totale .
Si dovrebbe fermare ad un solo calcolo .
Ho provato a lasciare solo SCARICOTOTALE , cosi e corretto , ma se cambio voce tabella mi da quella nuova sostituendo il vecchio valore . Per essere chiari :

Fattura 1 : scaricototale 10
Fattura 2 : scaricototale 15
Fattura 3 : scaricototale 20
Quindi in giacenzascarico dovrei avere scarico 10+15+20

Attualmente cliccando con il codice suddetto lasciando Giacenzascarico.Value:=scaricototale; mi da giacenza 10 o 15 0 20 , mettendo Giacenzascarico.Value:=Giacenzascarico.Value+scari cototale; mi raddoppia contunuamente i valori ad ogni clic .
Spero di essere stato chiaro .
Grazie