delphi For的漏洞

//用For不让加循环变量
//如果数组长度为零, Low(array)也是0, high(array) 为-1
//For I := Low(array) to High(arr) 中即使改变arr长度, 循序次数也是一样
//因为它已经固定了
While可以
//i := 0;
//while I < High(arr) do begin // while 每次都判断长度
// SetLength(arr, 0);
// Inc(I);
//end; // I = 1