各位大侠
  请问我如何将AdvStringGrid1 第一列设置可编辑(好录入数据) 第二列不可编辑
谢谢

解决方案 »

  1.   

    没有用过这个控件,楼主可以看看控件自带的demo,那里面应该有详细的介绍!
      

  2.   

    procedure Tb1.AdvStringGrid1IsFixedCell(Sender: TObject; ARow,
      ACol: Integer; var IsFixed: Boolean);
    begin
    if arow=3 then isfixed:=true;
    end;
      

  3.   


    procedure TForm1.advstrngrd1CanEditCell(Sender: TObject; ARow,
      ACol: Integer; var CanEdit: Boolean);
    begin
        if ACol = 1 then
            CanEdit := True
        else
            CanEdit := false;
    end;
      

  4.   

    procedure TForm1.advstrngrd1CanEditCell(Sender: TObject; ARow,
      ACol: Integer; var CanEdit: Boolean);
    begin
      CanEdit := (ACol <> 0)
             and (ACol <> 2)
             and (ACol <> 5);
    end;
    第0、2、5列都不可编辑