开工就遇到问题,帮帮忙!! 求“取随机数”的算法:有N个整数,没有规律,怎么从他们中间随机取出M个数麻烦各位大虾指教(代码最好),先谢谢各位 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 可以先办N数字放在数组中,然后在0-(N-1)范围内得到M个数字,然后以这M个数字作为下标,得到N个整数中的M个数字 用random函数,向楼上说的把这些数放到数组里,比如说有20个数,随机取出20之内的某个数random(20)。求得该数组的下标,那样就得到这个数了。使用random之前要先Randomize一下。 首部 function RandomFrom(const AValues: array of string): string; overload; $[StrUtils.pas功能 随机返回字符串数组AValues中的一个元素说明 之前建议执行Randomize参考 function System.Random例子 Randomize; Edit3.Text := RandomFrom(['a1', 'a2', 'a3', 'a4']); ListView列名的Caption属性,中文乱码 有关ado连接问题 用Delphi7的 IdUDPServer控件出问题 两个关于RAVE报表的问题,100分紧急求救 !! SocketConnection控件具体怎么使用?各属性应该怎么设置呢? 关于TWebBrowser的问题,多谢各位 winsock的api有那些?怎么用?与WIN32 API有什么分别? canvas的问题 有否函数得到系统资源的使用情况,如需要得到当前系统资源的占用率? 请帮忙修改左轻候的论坛离线浏览程序,ADO数据库格式,下载包括数据库和源程序。 今天辞职,放分200 关于timer的问题
功能 随机返回字符串数组AValues中的一个元素
说明 之前建议执行Randomize
参考 function System.Random
例子 Randomize; Edit3.Text := RandomFrom(['a1', 'a2', 'a3', 'a4']);