[已解决]如下图，怎样给编辑框输入一个随机数？

菜鸟新手 · 发表于 2018-5-22 16:56:20

您需要登录才可以下载或查看，没有账号？立即注册

x

怎样给编辑框赋一个随机数？

最佳答案

冬雪雪冬

2018-5-22 18:09:06

procedure TForm1.FormCreate(Sender: TObject);
begin
  randomize;
  edit1.Text := intTostr(random(100));
end;

冬雪雪冬 · 发表于 2018-5-22 18:09:06

procedure TForm1.FormCreate(Sender: TObject);
begin
  randomize;
  edit1.Text := intTostr(random(100));
end;

菜鸟新手 · 发表于 2018-5-22 21:46:39

谢谢！

账号		自动登录	找回密码
密码			立即注册