Stringgride

Question

我用的是StringGride 控件
我想控制 某例只读,不能写.
怎么设置啊,

Answer 1

如果通过属性设置的话
可以设置成fixcol，但是要求这些列必须在前面且连续，如果要随意设定，这种方法就不行了，只能通过代码实现

Answer 2

可以通过这种方法，使此列无法获得焦点，也就无法修改了procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
  if ACol=2 then
    CanSelect:=False
  else
    CanSelect:=True;
end;

Answer 3

在onkeypress事件中if stringgrid1.Col=i then
   key:=#0;