2,507
社区成员
发帖
与我相关
我的任务
分享各位大虾，我想用delphi产生一个10位的随机密码，密码中有英文也有中文，我忘记用什么函数?
各位大虾，我想用delphi产生一个10位的随机密码，密码中有英文也有中文，怎么做？
...全文
请发表友善的回复…
发表回复
gzl 2003-04-25
- 打赏
- 举报
呵呵，同意楼上。有也是第三方的，建议自已动手丰衣足食。
dabaicai 2003-04-25
- 打赏
- 举报
去死，有这函数？
Delphi里有随机数，但只是整数
自己写一个吧！
Delphi里有随机数，但只是整数
自己写一个吧！
xixia1 2003-04-25
- 打赏
- 举报
定義字符串﹐
random產生随机數取字符串﹐
random產生随机數取字符串﹐
xuwanggan 2003-04-25
- 打赏
- 举报
一个字符串放不下所有汉字哦
AM_WJ 2003-04-25
- 打赏
- 举报
没看到中文列.
ggltechggl 2003-04-25
- 打赏
- 举报
各位兄弟：
这个问题我自已还是解决了，其实也是很简单的。s:='123456789ABCDEFGHIJKLMNPQRSTUVWXYZ';
s1:='';
for i:=0 to 9 do
begin
i0:= random(35 );
s1:=s1+copy(s,i0,1);
edit1.Text :=s1;
end;
这个问题我自已还是解决了，其实也是很简单的。s:='123456789ABCDEFGHIJKLMNPQRSTUVWXYZ';
s1:='';
for i:=0 to 9 do
begin
i0:= random(35 );
s1:=s1+copy(s,i0,1);
edit1.Text :=s1;
end;
