●●●如何实现某些字段对某个有权限的人可写，而其他人只读？清高手关注！！！！

Question

例如有一字段“建议信息”，有一定权限的人可写该字段，另外一些有同样权限的人只能续写，另外的人只能浏览？
１。如何实现（最好有代码）
２。如何设置权限我用的是ｓｑｌｓｅｒｖｅｒ２０００＋ｄｅｌｐｈｉ６．０
目前作功能预览只用的ａｃｃｅｓｓ２００３＋ｄｅｌｐｈｉ６．０分不够可再加！谢谢大家技术支持

Answer 1

判断一下啊!假如一个查找按钮!if 无权限 then
  showmessage('无权操作');
else
begin
  //开始查找!
end;

Answer 2

试一下:
procedure TForm1.DBEdit1Exit(Sender: TObject);
begin
  if 没有权限 then ADODataSet1.FieldValues['字段']:=ADODataSet1.FieldByName('字段').OldValue;
end;

Answer 3

procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
  if 该人有Column的修改权限 then
    DBGrid1.ReadOnly = False
  else
    DBGrid1.ReadOnly = True;
end;