delphi动态数组构成,delphi 动态数组做参数

arrTImage: array of TImage;

SetLength(arrTImage, imageCount+1); //分配空间需要比实际数量加1，不然释放的时候会报内存错误，非常奇怪，这是怎么回事呢？

  for I := 0 to Length(arrTImage) - 1 do
  begin
    // aComponent := Self.FindComponent('image' + inttostr(I));

    if arrTImage[I] <> nil then
    begin
      arrTImage[I].Picture.Bitmap := nil;
      arrTImage[I].Parent := nil;
      arrTImage[I].Free;
      arrTImage[I] := nil;
    end;

  end;

  SetLength(arrTImage, 0);