Delphi在默认情况下for循环的次数是确定的、不能更改的,有时我们又有在循环中更改循环次数的需求,让我们对代码可以更灵活地控制,实现代码如下:
uses System.Math; var I: Integer; begin for I := 0 to 9 do begin ShowMessage(IntToStr(I)); //只显示0,8,9 PInteger(@I)^ := Max(I, 7); end; end;
时间: 2024-10-14 12:48:40
Delphi在默认情况下for循环的次数是确定的、不能更改的,有时我们又有在循环中更改循环次数的需求,让我们对代码可以更灵活地控制,实现代码如下:
uses System.Math; var I: Integer; begin for I := 0 to 9 do begin ShowMessage(IntToStr(I)); //只显示0,8,9 PInteger(@I)^ := Max(I, 7); end; end;