怎样为Table Control创建一个右键菜单（Context Menu），大致步骤如下：

1，创建一个GUI Status

在SE80中点击程序名，并点击右键的创建，找到GUI Status。

它与普通菜单栏的定义没什么不同，但是Status Type必须选择Context Menu，假设命名为ST_CTMENU。

2，设置TabCtrl的Context Menu Form

创建一个Table Control，随之在Screen Layout上双击TabCtrl的右上角，将弹出TabCtrl的属性设置。

在Context Menu Form这里，填入ON_CTMENU_TAB1。这是个Subroutine的名称。

程序运行时，当用户在Table Control范围内点击右键，系统将自动调用该Subroutine。

3，弹出右键菜单

当用户右击鼠标后，程序可以载入在步骤一中预设置的菜单，系统将自动在界面显示。

FORM. on_ctmenu_tab1 USING po_menu TYPE REF TO cl_ctmenu.
CALL METHOD cl_ctmenu=>load_gui_status
    EXPORTING
      program = sy-repid
      status = 'ST_CTMENU'
      menu    = po_menu
    EXCEPTIONS
      OTHERS = 9.
IF sy-subrc = 0.
    MESSAGE 'GUI Status loaded.' TYPE 'S'.
ENDIF.
ENDFORM.                    " ON_CTMENU_TAB1

4，响应具体事件

上面的步骤仅仅是弹出右键菜单，而用户可能在Context Menu上选择某个功能。

用户选择某具体功能的操作，与点击界面上某按钮的结果是一样的，将触发Screen的某Function Code。

该Function Code在步骤一中定义Context Menu时就一块定义了。

实际上，Screen上的Text Field，Input/Output Field，Box，也都可以设置右键菜单（Context Menu），设置步骤跟Table Control一模一样。

ITPub博客

ABAP：为Table Control创建Context Menu（转老宋）

最新文章