再问:有关Random函数 randomise;edit1.text:=random(234453); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 fshrq() 你的代码共有两个错误:1扩大了范围(1..234453->0..234453)2Random返回值是整型数,不能直接给TEdit.Text赋值(Edit1.Text:=IntToStr(Random(234452)+1); 如果不能直接random(234453)那么分页random(23)*10000+random(4453) 用解压所控件VCLUnZip解压文件时的一个问题!!! adoquery的字段别名问题 如何实现用在程序中,以其它Windows身份访问网上资源? 怎样在installshield express 中写入中文? 用word2000进行报表的输出 请问怎样通过Dbgrid修改多条记录? 如何釋放? 一个由dpr生成的WINMAIN橙黄体怎么加载到一个panel中 有剪切粘贴删除的代码吗 关于动态路径问题 如何得到当前计算机的名称? delphi一个例子的疑问,关于serversocket
你的代码共有两个错误:
1扩大了范围(1..234453->0..234453)
2Random返回值是整型数,不能直接给TEdit.Text赋值(Edit1.Text:=IntToStr(Random(234452)+1);
random(23)*10000+random(4453)