
Originariamente inviata da
Nettuno95
Il codice parla chiaro.
Ad on click il campo Giacenzascarico viene aumentato del suo valore più un valore proveniente da un calcolo, secondo me ti manca un flag di controllo nelle varie tabelle che dice se i vari campi sono stati calcolati oppure no, qualcosa del tipo:
codice:
table1.filtered := false;
table1.filter := 'flagscaricato=false';
table1.filtered := true;
try
while notTable1.EOF do
begin
// oppure al posto del comandi filter
// if not tabella1flagscaricato.asboolean then
scaricototale:=scaricototale+Table1Scarico.Value;
tabella1flagscaricato.asboolean := true;
Table1.Next;
end;
GiacenzaScarico.Edit;
Giacenzascarico.Value:=Giacenzascarico.Value+scaricototale;
Giacenza.Post;
finally
table1.filtered := false;
end;
Spero di aver capito il problema
N.