Delphi：循环语句for-in

https://www.jianshu.com/p/0fd88af44e4b

1.for-in 循环中，循环对数组， 列表，字符串或其他   有序 类型的容器的每个元素进行操作。
2.打开IDE，新建VCL应用，添加一个button1，一个memo1，双击button1，编写代码：

procedure TForm1.Button1Click(Sender: TObject);
var
  str: string;
  c: Char;
  Arr: array [0 .. 5] of integer;
  i: Integer;
begin
  Memo1.Clear;
  str := 'ABCD';
  Memo1.Lines.Add('遍历字符串:'+str);

  for c in str do // 遍历字符串
    Memo1.Lines.Add(c);


  Memo1.Lines.Add('遍历数组:Arr[]');
  for var j := 0 to 5 do
    Arr[j]:=Random(10);
  for i in Arr do         // 遍历数组
    Memo1.Lines.Add(i.ToString);


  Memo1.Lines.Add('遍历子子界:[10..15]');

  for i in [10..15] do         // 遍历数组
    Memo1.Lines.Add(i.ToString);

end;