随机数 ( 积分: 2 )

  • 主题发起人 主题发起人 mawei0913_green
  • 开始时间 开始时间
M

mawei0913_green

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
begin
Randomize;
showmessage(chr(65+random(26))+chr(65+random(26))
+inttostr(Random(10))+inttostr(Random(10))
+chr(65+random(26))+chr(65+random(26)));
end;
请教:65在此程序里代表什么意思,请各位高人明示
 
怎么没有人回答呀,分数是次要的,知识是无限的呀
 
chr就是数字和字符的转换 以ascii码为标准
A对应的asc码就是65 B是66,.....
65+random(26) 是在65~ 90 之间 经过chr转换正好是A~Z
就是你想要的结果
 
很感谢,这位仁兄,正是本人想要的结果
 

Similar threads

I
回复
0
查看
794
import
I
I
回复
0
查看
648
import
I
I
回复
0
查看
570
import
I
后退
顶部