• ALV面向对象方法研究:添加双击方法(二)


         继续上篇的内容。

         本文讲解如何添加双击的方法。

         首先程序的开头定义事件类,在ZALV_OO前:   

      CLASS LCL_EVENT_RECEIVER DEFINITION DEFERRED.

    *定义事件
    DATA EVENT_RECEIVER TYPE REF TO LCL_EVENT_RECEIVER.


    * 定义事件属性跟方法
    CLASS LCL_EVENT_RECEIVER DEFINITION.
    PUBLIC SECTION.
    METHODS:
    * 双击方法
    HANDLE_DOUBLE_CLICK
    FOR EVENT DOUBLE_CLICK OF CL_GUI_ALV_GRID
    IMPORTING E_ROW E_COLUMN.
    ENDCLASS. "LCL_EVENT_RECEIVER DEFINITION

    *----------------------------------------------------------------------*
    * CLASS LCL_EVENT_RECEIVER IMPLEMENTATION
    *----------------------------------------------------------------------*
    * * 双击方法实现
    *----------------------------------------------------------------------*
    CLASS LCL_EVENT_RECEIVER IMPLEMENTATION.
    METHOD HANDLE_DOUBLE_CLICK.
    PERFORM GETRECORD USING E_ROW-INDEX E_COLUMN-FIELDNAME.
    ENDMETHOD. "HANDLE_DOUBLE_CLICK
    ENDCLASS. "LCL_EVENT_RECEIVER IMPLEMENTATION

    *&---------------------------------------------------------------------*
    *& Form GETRECORD
    *&---------------------------------------------------------------------*
    * 具体事件
    *----------------------------------------------------------------------*
    FORM GETRECORD USING E_ROW-INDEX E_COLUMN-FIELDNAME.
    READ TABLE IT_SFLIGHT INDEX E_ROW-INDEX.
    *将行列等信息合并到字符串
    DATA: MSG(100).
    CONCATENATE '行:' E_ROW-INDEX '列名:' E_COLUMN-FIELDNAME INTO MSG.
    CONCATENATE S1 ' CONNID:' IT_SFLIGHT-CONNID INTO MSG.
    CONCATENATE S1 ' CARRID:' IT_SFLIGHT-CARRID INTO MSG.
    MESSAGE MSG TYPE 'I'.
    ENDFORM. "GETRECORD

       然后在ZALV_OO里面刷新ALV前加上此事件:   

    CREATE OBJECT EVENT_RECEIVER.
    SET HANDLER EVENT_RECEIVER->HANDLE_DOUBLE_CLICK FOR GR_ALVGRID.

       如下图:

       

       

  • 相关阅读:
    ガリレオの苦悩 操縦る 3
    ガリレオの苦悩 操縦る 2
    ガリレオの苦悩 操縦る 1
    ガリレオの苦悩 落下る 2
    ガリレオの苦労 落下る 1
    magento搬家步骤和可能遇到的问题
    Magento 自定义URL 地址重写 分类分级显示
    234的笔记
    Magento架构师的笔记-----Magento显示当前目录的父分类和子分类的分类名
    怎么用jquery判断浏览器类型和版本号?
  • 原文地址:https://www.cnblogs.com/saper/p/2380988.html
Copyright © 2020-2023  润新知