Ignore en 0 værdi i en currencyEdit ved beregning
Fejl: this is not a valid integer valueJeg har følgende kode:
var
FirstNumber,SecondNumber,LastNumber: Integer;
begin
FirstNumber := StrToInt(currencyEdit2.Text);
SecondNumber := StrToInt(Currencyedit3.Text);
LastNumber := StrToInt(Currencyedit4.Text);
Currencyedit5.Text :=IntToStr(FirstNumber + SecondNumber + Lastnumber);
Currencyedit3.Text og Currencyedit4.Text kan til tider have værdien 0 da der i nogle tilfælde ikke kommer en beregning i de felter.
Hvordan kan jeg få den til at "steppe" over og ignorere at værdien i felterne gerne må være 0?
Ideen er at kan den ignore de 2 felter som er 0 så skal den bare lægge værdien fra CurrencyEdit2 i CurrencyEdit5.