procedure TForm1.btn1Click(Sender: TObject);
var
c:Integer;
begin
for c:=5 downto 0 do
begin
ShowMessage(IntToStr(c));
end;
end;
var
c:Integer;
begin
for c:=5 downto 0 do
begin
ShowMessage(IntToStr(c));
end;
end;
for c:=0 to 5 do
begin
ShowMessage(IntToStr(c));
end;
end;
其实就是证明循环式从小到大还是从大到小
本文通过 Delphi 代码示例展示了两种不同的循环方式:一种是从大数值递减到小数值,另一种则是从小数值递增到大数值。这两种循环分别使用了 for c:=5 downto 0 do 和 for c:=0 to 5 do 的语法。
1215

被折叠的 条评论
为什么被折叠?



