delphi for 循环 to和downto的理解


本文整理自网络,侵删。

 

procedure TForm1.btn1Click(Sender: TObject);
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;
end.

其实就是证明循环式从小到大还是从大到小

相关阅读 >>

Delphi求数组最大\最小值

Delphi使用json解析调用淘宝ip地址库rest api 示例

Delphi使用indy组件http上传文件

Delphi ioutils tdirectory获取一个目录下所有文件名,包括子目录

Delphi中读取硬盘的物理序列号

Delphi strtofloat 将“字符型”转换成“浮点型”

Delphi 提取时间成分

Delphi 获取系统mydocuments文件夹路径

Delphi 实现窗口记住关闭时的坐标位置

Delphi �c 使用createoleobject后释放olevariant

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...