動態數組

方法:
      var
         A:array of Integer;
      begin
           ShowMessage(IntToStr(High(A))); //<- 值為1
           SetLenght(A,3);
           ShowMessage(IntToStr(High(A))); //<- 值為3
      end;
  注:這是Delphi4.0新添的功能.