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以二进制方式读取图片并显示出来

Delphi判断字符串中是否包含汉字,并返回汉字位置

pos、ansipos、fillchar在Delphi2010中unicode的问题

Delphi检测程序内存泄漏

Delphi xe2读取内存偏移数据代码

Delphi idftp 错误:socket error 10054 �c connection reset by peer -连接被重置

Delphi 系统服务运行桌面用户指定程序

Delphi 检验指定字符串网址是否输入正确

Delphi 快速远程屏幕传输api版

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



打赏

取消

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

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

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

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

评论

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