Тогда можно сделать так.
Есть табличка где прописаны роли.
Так же д.б. табличка где сотруднику присваивается эта роль. Если нет то создайте, там несколько полей всего будет. У меня она называется Member Of.
Создайте роль, присвойте ее всем необх. сотрудникам.
На OnOpenForm напишите:
IF "Member Of".GET(USERID,'Название роли') THEN BEGIN
CurrForm."Ваше поле".EDITABLE:=FALSE;
END;
Такой вариант лучше.
|