var
  aa : array[1..10] of integer;
begin
  ShowMessage(inttostr(Length(AA))); // 10
end;

var a:array of string;
begin
  if a=nil then caption:='nil1';
  setlength(a,10);
  if a=nil then caption:='nil2';
end;

var
 ASS:array of string;
begin
  ASS: Copy(傳入的陣列);  

  if 傳入的陣列 = nil then 

引言: 謝謝 scottliou 和站長的回答 小弟在這還有一個問題也是有關陣列方面的，在Pascal中的函數及程序 可用陣列當作參數以避免未知的參數數目，可是當要是用陣列當作參時在函數(程序)中要是你用

var
 ASS:array of string;
begin
  ASS: Copy(傳入的陣列);  

此時會Delphi 會吐一個 Incompatible types 給你 或是用

  if 傳入的陣列 = nil then 

還是吐一個 Incompatible types 給你 以上的語法看來都是沒有錯但Delphi就是 一直吐Incompatible types 給你 煩請各位大大給小弟解答一下。 從思考取勝一切~q

procedure PassArray(data :array of string);
var i:integer;
begin
  form1.caption:='';
  for i := 0 to High(data) do
  begin
     form1.caption:=form1.caption data[i];
  end;
end;    procedure TForm1.Button1Click(Sender: TObject);
begin
   PassArray(['a','b','c']);
end;