delphi XE5实现随机大小写字幕或者数字  
官方Delphi 学习QQ群: 682628230(三千人)\n
频道

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


介绍

本文章介绍了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));
推荐分享
图文皆来源于网络,内容仅做公益性分享,版权归原作者所有,如有侵权请告知删除!
 

Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号

执行时间: 0.051476955413818 seconds