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

6 votes164 views8 answers
React -slick
Delphi
1 vote247 views1 answer
Case delphi
Delphi
0 vote172 views1 answer
Free array Delphi 7
Delphi
0 vote124 views1 answer
How to end a program in delphi
Delphi
5 votes273 views3 answers
Copy function delphi
Delphi
0 vote204 views1 answer
Ceil function delphi
Delphi
0 vote170 views1 answer
How to deacrease Time in delphi
Delphi
0 vote236 views1 answer
Delphi check if key pressed is enter
Delphi
0 vote262 views1 answer
Delphi draw antialiased line
Delphi
2 votes265 views1 answer
Get last element of array delphi
Delphi