1、2:
type
  TArr2 = array[1..2, 1..3]of integer;
var
  VArr: TArr2 = ((1, 1, 1), (1, 1, 2)); // 只有非局部变量才能被初始化function Foo(arr: TArr2): integer;
begin
  Result := arr[1,1] + arr[1, 2];
end;procedure TForm1.Button1Click(Sender: TObject);
begin
  Foo(VArr);
end;3、"list out of index" 错误是在索引链表时,索引值超出了链表范围,如:
  {在 list.Count = 0 时} list[0]; {--> 发生"list out of index" 错误} 
  你要注意 IndexFields 属性是数据集的索引字段,请参考:
IndexFields provides a zero-based array of field objects, each of which corresponds to a field in the current index. Index is an ordinal value indicating the position of a field in the index. The first field in the index is IndexFields[0], the second is IndexFields[1], and so on.