delphi - 调用 cxGrid Navigator 按钮的 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);

希望这能回答您的问题。