type
  TAccessRight = (iaRead, iaWrite);
  TAccessRights = set of TAccessRight;  TDemoRecord = record
      ItemName: string;
      AccessRight: TAccessRights;
      Result: integer;
  end;  TArraryRecord = array of  TDemoRecord;const T       <--如何赋初值?

解决方案 »

  1.   

    T是什么类型???
    如果是TDemoRecord的话,就需要重载=了,但是不知道行不行 :(
      

  2.   

    TArraryRecord是个动态数组类型,这样const类型的T好像不能定义 啊...
      

  3.   

    如果这样能不能赋初值呢?T:array[1..5] of  TDemoRecord;
      

  4.   

    你有见过给动态数组声明为常量的方式吗?
    T只能声明为结构数组进行赋值,可以这样赋值:
    const
      T : array [1..5] of TDemoRecord = (
        (ItemName :'Test';AccessRight:iaRead;result :1),(......),
        (......)......);