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 winapi: setlayeredwindowattributes - 设置窗口的透明

Delphi 对比两个文件是否相同的函数

Delphi中动态加载image控件图片的方法

Delphi共享软件防破解的实用方法

Delphi编程之系统oem diy

Delphi xe6 android 界面皮肤美化 用stylebook

Delphi 播放背景音乐

Delphi isleapyear、isinleapyear - 是否是闰年

Delphi firedac 下的 sqlite [6] - 加密

Delphi idhttp.get方法

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

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