delphi生成随机数

所需积分/C币:50 2012-06-18 10:38:34 614B TXT
23
收藏 收藏
举报

delphi产生随机数2009-07-27 18:58//用delphi产生不重复的随机数 ****************************************************************************************** var aa : array[1..36] of string[2]; //aa数组为需要随机排列的数组,{先把1..36按顺序给aa数组赋值} procedure TForm1.FormCreate(Sender: TObject); var i:integer; begin for i:=1 to 36 do beg

...展开详情
立即下载 低至0.43元/次 身份认证VIP会员低至7折
一个资源只可评论一次,评论内容不能少于5个字
lucky1026 使用还可以吧
2018-03-04
回复
qq_31401343 有点问题,但是值得借鉴
2015-12-15
回复
GoodTekken 解决了我的问题, 谢谢分享~
2015-07-03
回复
上传资源赚积分or赚钱
    最新推荐