本文整理自网络,侵删。
procedure TForm1.Button2Click(Sender: TObject);var aChar: Char;begin for aChar := 'a' to 'z' do
Memo1.Lines.Add(aChar); // Show (aChar);end;
相关阅读 >>
Delphi xe 获取 android application version 版本
Delphi10.3通过json.serializers单元对大量数据序列化
更多相关阅读请进入《Delphi》频道 >>