delphi - 为 cxGrid 导航器按钮调用 Onclick 事件

Question

如何为 cxGrid Navigator 按钮调用 Onclick 事件？我似乎找不到它。

截图如下...

谢谢，

Answer 1

在以下示例View中是TcxGridDBTableView拥有导航器：

导航器按钮通过View调用的属性公开NavigatorButtons。 NavigatorButtons是类型TcxNavigatorControlButtons

在TcxNavigatorControlButtons你会发现所有你的按钮：

  TcxNavigatorControlButtons = class(TcxCustomNavigatorButtons)
  ...
  published
    property ConfirmDelete;
    property CustomButtons;
    property Images;

    property First;
    property PriorPage;
    property Prior;
    property Next;
    property NextPage;
    property Last;
    property Insert;
    property Append;
    property Delete;
    property Edit;
    property Post;
    property Cancel;
    property Refresh;
    property SaveBookmark;
    property GotoBookmark;
    property Filter;
  end;

因此，如果您想单击“下一步”按钮，您可以编写

  View.NavigatorButtons.Next.Click;

如果且仅当按钮启用时，才会触发 OnClick 事件。

有 16 个按钮，每个按钮都由它自己的索引定义：

const
  NavigatorButtonCount = 16;

  NBDI_FIRST        = 0;
  NBDI_PRIORPAGE    = 1;
  NBDI_PRIOR        = 2;
  NBDI_NEXT         = 3;
  NBDI_NEXTPAGE     = 4;
  NBDI_LAST         = 5;
  NBDI_INSERT       = 6;
  NBDI_APPEND       = 7;
  NBDI_DELETE       = 8;
  NBDI_EDIT         = 9;
  NBDI_POST         = 10;
  NBDI_CANCEL       = 11;
  NBDI_REFRESH      = 12;
  NBDI_SAVEBOOKMARK = 13;
  NBDI_GOTOBOOKMARK = 14;
  NBDI_FILTER       = 15;

如果您愿意，可以使用此索引来单击某个按钮：

 View.NavigatorButtons.ClickButton(NBDI_EDIT);

希望这能回答你的问题。