setlength(data,i);
for j:=0 to i-1 do
  setlength(data[j],2);
不知可否,供参考

解决方案 »

  1.   

    我自己也查出來是 data[i-1,0],解決了!SetLength(data,2,i);和SetLength(data,2,i);-哪一個是定義行數不定為i值,列數為2的一個兩維數組????
              
      

  2.   

    data[i-1,0]:=dateinfo;---賦給i行第一列
    data[i-1,1]:=staidinfo;---賦給i行第二列  
    ——笔误吧。
    以下代码测试通过:
    procedure TForm1.Button3Click(Sender: TObject);
    var
     data:array of array of string;
     j,i:word;
    begin
       i:=5;
      setlength(data,i);
      for j:=0 to i-1 do
        setlength(data[j],2);
      data[i-1,0]:=edit1.Text;
      data[i-1,1]:=edit2.Text;
      edit2.text:=data[i-1,0];
      edit1.Text:=data[i-1,1];
    end;    
      

  3.   

    SetLength(data,i,2);-是定義行數不定為i值,列數為2的一個兩維數組