delphi 自定义产生随机字符串函数

本文整理自网络，侵删。

 {自定义产生随机字符串函数}
function GetRandomName:string;
var
SourceStr,Str:String;
i:integer;
begin
SourceStr:='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz';
for i:=1 to 16 do Str:=Str+SourceStr[Random(51)+1];
Result:=Str;
end; 

相关阅读 >>

Delphi android控制睡眠

Delphi读ios的设备id

Delphi exe注入代码

Delphi xe5 将Delphi code从winos 迁移到ios与android

Delphi检查是否在64位windows环境中运行？

Delphi 延迟时间函数

Delphi settimer 用法

Delphi动态创建控件的例子

Delphi的一些开发技巧和方法

Delphi 将字符串转换为c-escape转义字符串格式

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

转载请注明出处：木庄网络博客 » delphi 自定义产生随机字符串函数