Delphi XE5实现随机大小写字幕或者数字

QQ空间 新浪微博 腾讯微博 腾讯朋友 QQ收藏 百度空间 百度贴吧 更多

介绍 本文章介绍了Delphi XE5实现随机大小写字幕或者数字，下面通过代码介绍 1：生成英文小写随机字母 Randomize;      S := Chr(ord('a') + Random(26)); 2：生成英文大写随机字幕 Randomize; S := Chr(ord('A') + Random(26)); 3：随机数字 Randomize; S := Chr(ord('0') + Random(10));