TDeaAccessRights = (

 arNone = 0,

 arView = 1,

 arEdit = 2,

 arFull = 3);