请教大家，从a到z循环如何写！

Question

var
i: integer;
begin
  for i:= ord('a') to ord('z') do
  begin
    caption:=chr(i);
  end;
end;

Answer 1

var
i: integer;
begin
  for i:= ord('a') to ord('z') do
  begin
    Label1.Caption:=chr(i);
  end;
end;

Answer 2

i:integer;
for i:=97 to 123 do
begin
  showmessage(chr(i));
end;

Answer 3

把从a到z转换成ord，不就可以循环了么！

Answer 4

var
i: integer;
j:integer;
begin
  for i:= 1 to MAX do
  begin
    j:=((i-1) mod 26);
    Label1.Caption:=chr(j+ord('a'));
  end;
end;

Answer 5

i:integer;
for i:=97 to 123 do
begin
  showmessage(chr(i));
end;

Answer 6

var
ij,: integer;
begin
  for i:= 1 to MAX do
  begin
    j:=(i-1) mod 26
    Label1.Caption:=chr(j+ord("a"));
  end;
end;

Answer 7

var
i: integer;
begin
  for i:= ord('a') to ord('z') do
  begin
    Label1.Caption:=chr(i);
  end;
end;
怎么都知道啊，还有大写的是65-90，小写的是97-123 替换ord('')就可以了

Answer 8

var
  i :Char;
begin
   for i:= 'a' to 'z' doend;

Answer 9

for i:= ord('a') to ord('z') do begin .....end