C Calvin Unregistered / Unconfirmed GUEST, unregistred user! 2000-06-23 #4 procedure TForm1.DBGrid1Enter(Sender: TObject); var i:Integer; aColumn:TColumn; begin for i:=0 to DBGRid1.Columns.Count-1 do begin aColumn:=DBGrid1.Columns; if aColumn.Field=Table1.FieldByName('FIRST_NAME') then aColumn.ReadOnly:=True; end; end;
procedure TForm1.DBGrid1Enter(Sender: TObject); var i:Integer; aColumn:TColumn; begin for i:=0 to DBGRid1.Columns.Count-1 do begin aColumn:=DBGrid1.Columns; if aColumn.Field=Table1.FieldByName('FIRST_NAME') then aColumn.ReadOnly:=True; end; end;
阿 阿器 Unregistered / Unconfirmed GUEST, unregistred user! 2000-06-23 #6 程序中实现可用calvin，设计期可用字段编辑器，选中要所定的字段，将readonly设为真即可
C Calvin Unregistered / Unconfirmed GUEST, unregistred user! 2000-06-24 #7 我想我的答案比较合题意。 不过这要看你的需要了，如果整个程序运行时不想被人修改就最好在设计时把字段设为ReadOnly，如果只是不想别人在DBGrid中修改，就在程序中设置比较好。
C Calvin Unregistered / Unconfirmed GUEST, unregistred user! 2000-06-24 #8 补充： 另外，你也可以双击DBGrid进入表列编辑器，定义列，再把需要的列的ReadOnly属性设为True。
J jqw Unregistered / Unconfirmed GUEST, unregistred user! 2000-06-24 #10 使用Rxlib2.75控件包中的TDBGrid,设置其FixedCols即可!
