Delphi calculator

var 
i1,i2:integer;
Begin
i1:=strtoin(inputbox('number','enter number',''));
i2:=strtoin(inputbox('number','enter number',''));
showmessage(inttostr(i1+i2));
End;

Similar codes

2 votes273 views1 answer
Get last element of array delphi
Delphi
8 votes248 views4 answers
Bootstrap display error message
Delphi
0 vote178 views1 answer
React replace object in array
Delphi
0 vote176 views1 answer
How to use incyear in delphi
Delphi
0 vote244 views1 answer
Delphi check if key pressed is enter
Delphi
1 vote254 views1 answer
Case delphi
Delphi
0 vote202 views1 answer
Breakpoint condition delphi
Delphi
6 votes259 views3 answers
How to install pip in python 3.9 windows 10
Delphi
1 vote258 views4 answers
"nickolasmin"
Delphi
0 vote139 views1 answer
How to end a program in delphi
Delphi