Delphi study for a period of time, on a whim want to have a calculator, met don't understand the problem?
Want to and by using the slide's digital display with a plus sign,
Var (global variable)
Sum1: extended;
Equals sign button:
Case flag of
1: Edit1. Text:=FloatToStr (StrToFloat (Edit1. Text) + sum1);



This is the plus button:
Sum1=strtofloat (edit1. Text);

Flag:=1;

CodePudding user response:

Try:
Display Numbers and a plus sign
Edit1. Text:=FloatToStr + '+' (111);

Edit1 shows 111 +