Acumular valores corretos sem uma tabela intermedi�ria

Question

Tenho um programa que vai somando valores de campos qdo sai do dbedit respectivo, acontece que se eu digito um valor errado e corrijo, ele n�o elimina o

Skywalker · Answer

caso voce esteja usando uma variavel para calcular o total da soma e simples voce pega o campo da tabela onde os dados somados estao sendo inseridos e manipula o evento dele OnSetText da seguinte forma

procedure TForm1.Seu_CampoSetText(Sender: TField, Text: String);
begin
Variavel_Soma:= Variavel_Soma - strtoint(Text);//estou supondo que o valor e inteiro
Seu_Campo.value:= Text;
Variavel_Soma:= Variavel_Soma + strtoint(Text);
end;