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 memo1 自定义位置插入

Delphi中判断一个字符串是否为数字

Delphi 如何将access数据库后缀名accdb改为mdb

Delphi打开外部程序或文件

Delphi unix时间转换成Delphi时间

Delphi xe7开发的获取网页中字符串的编码是否是utf8

Delphi 使用indy解决tidssliohandlersocketopenssl could not load ssl library错误

Delphi 动态添加资源文件

Delphi 无法结束进程的程序

Delphi 获取本机 hostname ip address

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

转载请注明出处：木庄网络博客 » delphi 批量生成 A到Z 字母