Sumas sucesivas

[[Caral]]

Hola
Entendamos el codigo parte por parte:
Aqui haces unos calculos sencillos indicando que el edit TotalRecibo es el que contendra el dato final.
Bien.

Código Delphi [-]
Fmensual.TotalRecibido.Text:=IntToStr(Round(Rec-(Cant*Rec*San/100)));

Luego quieres que el edit MontoTR sea sumado al edit TotalRecibo.

Código Delphi [-]
Fmensual.MontoTR.Text:=IntToStr(StrtoInt(Fmensual.MontoTR.Text)+StrtoInt(Fmensual.TotalRecibido.Text  ));

Bueno, aqui es donde esta el problema.
1- si el edit MontoTR no contiene un numero dara un error, por lo menos tiene que contener un cero (0), asi el error no saldra.
2- Si el edit MontoTR contiene un cero, el total siempre sera el mismo que el del edtit TotalRecibido.
Saludos