Delphi 多重循环

本文整理自网络，侵删。

 
program ExitLoop;
{$APPTYPE CONSOLE}
begin
  for var i:=1 to 10 do
    begin
      for var l:=1 to 10 do
        begin
          Writeln(i, ',' , l);
          if (i = 5) and (l = 5) then

        end;
    end;

  Writeln('Done.');
  Readln;
end.
 

相关阅读 >>

Delphi调用createprocess创建进程

Delphi getsessionusername通过会话id得到会话名称

Delphi system.netencoding

dll与exe之间的恩爱情仇

Delphi 处理以逗号分隔的长字符串

Delphi listbox1列表随机打乱

Delphi xe5中以andorid 启动应用程序

Delphi正则表达式

Delphi wininet带进度下载http文件

Delphi汇编级初探

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

转载请注明出处：木庄网络博客 » Delphi 多重循环