码迷,mamicode.com
首页 > 其他好文 > 详细

Delphi中如何设置TcxGrid里每个单元的可不可编辑

时间:2014-09-26 13:29:39      阅读:219      评论:0      收藏:0      [点我收藏+]

标签:des   style   blog   color   io   os   java   ar   for   

bubuko.com,布布扣

 

bubuko.com,布布扣

procedure TbsAdPartParaDMSForm.cxGridDBTableView3Editing(
  Sender: TcxCustomGridTableView; AItem: TcxCustomGridTableItem;
  var AAllow: Boolean);
var
  v_code: string;
begin
  inherited;
  AAllow := true;
 if (Pos(1248100,cxGridDBTableView3.Controller.FocusedRecord.Values[cxgridparaCode.Index])>0 )
//这个pos函数的作用是检索cxgridparaCode这列的每一行值所包含的字符串‘1248100’的个数 and (AItem.Index
=cxGridDBTableView3PARA_VALUE.Index) then AAllow:=False ; // else // AAllow:=True; v_code := Trim(cxGridDBTableView3.Controller.FocusedRecord.Values[cxgridparaCode.Index]) ; if ((v_code = 1) or (v_code = 2)) and (AItem.Index=cxGridDBTableView3REMARK.Index) then AAllow := false ; // else end;

 

Delphi中如何设置TcxGrid里每个单元的可不可编辑

标签:des   style   blog   color   io   os   java   ar   for   

原文地址:http://www.cnblogs.com/lxricecream/p/3994519.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!