如何对以下类型常量赋初值?

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

查看回复