求助二维数组定义

Question

帮忙看一下
function mrinv(n:integer;A:array [1..n,1..n] double):boolean;
我想把A定义成为二位数组，就像矩阵那样使用，当引用时候直接引用A[i,j]，但是定义的时候就出现错误了。

Answer 1

temp:array[0..100,0..100]   of   char
使用：temp[1,2]:=...

Answer 2

函数里面的话是
function sendms(tme:Array of char):integer;stdcall;

Answer 3

lz代码不妨改为：
type
  TDblMatrix = array [1..n,1..n] of double;function mrinv(n:integer; A:TMatrix):boolean; 

Answer 4

先定义一个类 
 type
  Tstr =record
  Tstr1:array [1..100]of string;
  end;var 
  TData: array [1..100]of Tstr;
function sendms(tme:Array of Tstr):integer;stdcall;

Answer 5

不能就那样定义吗？A:array [1..n,1..n] double
我定义a:array of array of double 也是提示错误
我现面就想直接引用A[i,j]

Answer 6

我添加了
type 
  TDblMatrix = array [1..n,1..n] of double; 
但是出现提示框：
expexte':' but an identifier found;

Answer 7

sorry 
有笔误改成这样的：(静态数据在定义时，下标必须为const 类型，不能用变量)
type 
  TMatrix = array [1..8,1..8] of double; function mrinv(n:integer; A:TMatrix):boolean; 

Answer 8

type
  TA=array of string;
type
  TB=array of TA;procedure TForm1.Button1Click(Sender: TObject);
var
  b:TB;
  i:integer;
begin
  setLength(b,8);
  for i:=0 to 7 do
    setlength(b[i],8);
end;这样就可以动态设置2维数组的长度了
多维的同理