过程中的参数是数组,应该怎么写?

Question

一维我知道是:procedure returnpic(x:array of real),但为什么不能设边界.
二维我就不知道怎么写了?
另外问一下:delphi中数组大小可以改变吗?
或者可以在程序运行时根据需要来设置大小吗?

Answer 1

procedure aaa(var Buf);管它是几维数组, 传进去一个指针就好了, 到里面想怎么处理就怎么处理

Answer 2

数组可以用动态数组var  
  a: array of Char;
begin
  Setlength(a, 100);  //此时数组a的大小为100
end

Answer 3

二维我就不知道怎么写了?
procedure returnpic(x:array of array of real),
但为什么不能设边界.delphi中数组大小可以改变吗?
Setlength(a, 100);  //此时数组a的大小为100
二维的有两种方法，如果是矩阵则很简单的Setlength(a, 100,30);
如不规则，就是每行的数组大小都不一样可以这样
先Setlength(a, 10);  然后Setlength(a[1], 3);  Setlength(a[2], 6);取得数组的上下标
for i:=Low(a) to High(a)

Answer 4

你要设边界也行先定义一个类型
type
  TA: array[0..10] of byte;然后在过程或函数中使用
procedure AA(A: TA)