集合型数组如何清空？

type myrec = record
    s: string;
    i: integer;
    d: double;
  end;
  tmyarray = array[0..200] of myrec;
var i:integer;
myarray: tmyarray;
begin
  for i := 0 to 200 do
     begin
       myarray[i].s := '';
       myarray[i].i := myarray[i].i + 1;
       myarray[i].d := myarray[i].d + 2;
     end
end;第一次赋值后想清空数组好第二次赋值，查了查用 myarray:=nil;或
SetLength(myarray,0);都不行，有简单点的办法吗？