cxGrid单元格获得输入焦点

最新推荐文章于 2022-02-26 11:11:39 发布

悟影

最新推荐文章于 2022-02-26 11:11:39 发布

阅读量3.3k

点赞数 1

分类专栏： DevExpressVCL 文章标签： TcxGridDBTableView TcxGridDBBandedTable cxgrid 获取输入焦点

本文链接：https://blog.csdn.net/lichuxiong/article/details/37882105

版权

DevExpressVCL 专栏收录该内容

4 篇文章 0 订阅

订阅专栏

cxGrid单元格获得输入焦点，主要用于数据集类的表格视图，如TcxGridDBTableView与TcxGridDBBandedTableView

很简单的一个函数，用于快速获取焦点来输入数据：

procedure cxGridViewSetFocus(FieldName: string; GridView: TcxCustomGridTableView);
var
  cxGrid: TcxGrid;
  AItem: TcxCustomGridTableItem;
begin
  cxGrid := TcxGrid(GridView.Control);
  if cxGrid.ActiveLevel <> GridView.Level then
    cxGrid.ActiveLevel := TcxGridLevel(GridView.Level);
  if (cxGrid.Focused=False)and(cxGrid.CanFocus) then
    cxGrid.SetFocus;

  with TcxGridDBDataController(GridView.DataController) do
  begin
    AItem := GetItemByFieldName(FieldName);
    if AItem <> nil then
    begin
      if AItem.Visible = False then
        AItem.Visible := True;
      AItem.Focused := True;
      GridView.Controller.EditingController.ShowEdit(AItem);
    end;
  end;
end;