this.ReadOnly = ALLTRIM(EVAL(thisform.Grid1.RecordSource+".Nam")) == 'PRIVATE '
this.ReadOnly = ALLTRIM(EVAL(thisform.Grid1.RecordSource+".Nam")) == 'PRIVATE'