5,388
社区成员
发帖
与我相关
我的任务
分享
procedure TForm1.Button1Click(Sender: TObject);
var i,j,c:integer;
si,sj,sc:string;
begin
i:=10;
si:=inttostr(i);
j:=20;
sj:=inttostr(j);
c:=i+j;
sc:=inttostr(c);
Edit1.Text:=IntToStr(c) ;
end;