弱弱的问一个二维数组的问题。

Question

比如这样的二级结构江苏
   南京
   苏州
   扬州
   连云港
   ....浙江
   杭州
   温州
   宁波
   ........
   ....
像这样的省市结构，我想建成一个二维数组，DELPHI该如何写？

Answer 1

自己建一个tree，用个一维数组存放代码吧

Answer 2

用记录加数组
注意:记录及数组类型中,尽量不使用string类型变量,自己修改一下unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TProvince = record
    pName : string;
    Citys : array of string;
  end;  TArrayProvince = array of TProvince;  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
var
  provinces : TArrayProvince;
begin
  SetLength(provinces,2);
  SetLength(provinces[0].Citys,5);      //长度自己根据实际数量定
  SetLength(provinces[1].Citys,10);
  provinces[0].pName := '江苏';
  provinces[0].Citys[0] := '南京';
  provinces[0].Citys[1] := '苏州';
  ......
  provinces[1].pName := '浙江';
  provinces[1].Citys[0] := '杭州';
  provinces[1].Citys[1] := '温州';
  ......
end;end.