DELPHI生成随机字符串

本文整理自网络，侵删。

 
DELPHI生成随机字符串
var
    SourceStr,str:string;
    i:integer;
begin
    SourceStr:='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789';
    randomize;
    for i:=1 to 16 do
      str:=str+sourcestr[Random(62)+1];
    ShowMessage(str);
end;
[注：生成长度为16位数，取值范围为'A-Z'a-z''0-9'的随机数]
 

相关阅读 >>

Delphi 根据关键字取关键词以后的字符串

Delphi 安卓 app 动态权限申请

Delphi中禁止webbrowser右键的方法

Delphi fmx 从app程序直接跳转到支付宝付款转帐页面

Delphi 批量给每个字符加括号

Delphi xe7 判断android应用程序中的通信状态类型

Delphi 2009 之 tedit 加强的功能

Delphi 软件版本称呼

Delphi timage 加上滚动条方法

Delphi模仿“千千静听”滚动标题栏，非常简单！

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » DELPHI生成随机字符串