delphi 批量生成 A到Z 字母


本文整理自网络,侵删。

 

var
i,m:integer;
Lstr:string;

 

//delphi 批量生成 A到Z 字母

for i:=0 to 25 do  begin
Memo_A.Lines.Add(Chr(97+i));
end;

 

//delphi 批量生成 A到Z 字母 按乘法口诀形式排列

for m:=0 to 25 do begin

Lstr:=Lstr+Chr(97+m)+' ';
Memo_A.Lines.Add(Lstr);
end;

 

 

相关阅读 >>

Delphi 判断是否为文件名

Delphi sccoloredid,星际争霸彩色 id 修改器 v0.2.0,支持 windows vista

Delphi 如何判断字符串是否是有效email地址

Delphi android 保持唤醒状态

Delphi 控制台读写

Delphi firedac 获取mysql 数据库databases 列表

Delphi 怎么将一个流转换成字符串?或者将字符串转出一个流

Delphi制作移动文字、图片

Delphi textfile utf8编码读写

Delphi tclientdataset的使用

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...