张志峰的博客

水滴石川,积少成多。

导航

2013年10月23日

摘要: procedure TfrmSetOutPzTradeDeptPerson.grdTradeClientEditing(Sender: TObject; AColumn: TcxTreeListColumn; var Allow: Boolean);begin if not Assigned(grdTradeClient.FocusedNode) then Exit; Allow := grdTradeClient.FocusedNode.Level = 1;end; 阅读全文

posted @ 2013-10-23 11:17 ╰★张志峰★╮ 阅读(521) 评论(0) 推荐(0)