max和min在delphi的用法和程序讲解
答案:2 悬赏:10 手机版
解决时间 2021-02-05 06:38
- 提问者网友：寂寞梧桐
- 2021-02-04 18:20
最好有程序例子
最佳答案
- 五星知识达人网友：杯酒困英雄
- 2021-02-04 19:24
求两值最大值和最小值
procedure TXiaoshouglf.Button1Click(Sender: TObject);
var x,y:integer;
begin
inherited;
x:=10;
y:=2;
edit1.Text := inttostr(max(x,y));
edit2.Text :=inttostr(min(x,y));
end;
要引用uses Math;
procedure TXiaoshouglf.Button1Click(Sender: TObject);
var x,y:integer;
begin
inherited;
x:=10;
y:=2;
edit1.Text := inttostr(max(x,y));
edit2.Text :=inttostr(min(x,y));
end;
要引用uses Math;
全部回答
- 1楼网友：一袍清酒付
- 2021-02-04 19:43
没看懂什么意思？
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯