1.在 Object Pascal 中,for 循环的计数器不必为数字。它可以是任何 序数类型 的值,例如字符。
2.打开IDE,新建VCL应用,添加一个button1,一个memo1,双击button1,编写代码:
procedure TForm2.Button1Click(Sender: TObject);
var
s: string; //定义一个字符串变量
begin
//显示出a...z的字母
for var AChar: char := 'a' to 'z' do
begin
Memo1.Lines.Add(AChar);
end;
// 显示字符串的每一个字母
s := 'Hello world!';
for var i := Low(s) to High(s) do
begin
Memo1.Lines.Add(i.ToString + ':' + s[i]);
end;
end;