type TGBDl=record
        len:byte;
        info:string;
end;const
Gbdl array [1..3] of Tdbdl=(?????)
应该如何写呢

解决方案 »

  1.   

    type Tgbdl= record
       len:byte;
       info:string;
    end;
    aaa = ^Tgbdl
    gbl array [1..3] of aaa;
      

  2.   

    Gbdl: array[1..3] of Tgbdl=((len:1; info:'111'),
                                (len:2; info:'222'),
                                (len:3; info:'333'));
      

  3.   

    Gbdl: array[1..3] of Tgbdl=((1,'111'),
                                (2, '222'),
                                (3, '333'));