
哪为大哥给我一段用delphi编写的代码,在edit1,edit2中输入两个数,点击button后在label中输出大的那个数
1个回答
展开全部
procedure Button1Click(Sender:TObject);
begin
if StrToInt(Edit1.Text)>StrToInt(Edit2.Text) then
Label1.Caption:=Edit1.Text
else
Label1.Caption:=Edit2.Text;
end;
begin
if StrToInt(Edit1.Text)>StrToInt(Edit2.Text) then
Label1.Caption:=Edit1.Text
else
Label1.Caption:=Edit2.Text;
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询