wda学习案例6tabtrip与close事件

1、一、需求Tabtrip 每一个tab 上有 关闭按纽.点击其,可以隐掉该tab。结果如图 1 所示：图 1二、实现1,在view 中画出来控件tabstrip，然后点右键 insert tab 四次出现四个tab。2,在context 中定义四个wdy_变量，分别为t1,t2,t3,t4.3,对四个 tab 控件的属性进行填写.4,点击 tab 属性visible 的binding 按钮，让其分别于 context 的变量进行绑定。5,填写 tabstrip 属性，其中事件 onClose 的栏位中写一个on_close 方法，6,双击 on_close,进入代码编辑器，代码如下：method

2、 ONACTIONON_CLOSE . data: lo_Node type ref to If_Wd_Context_Node,lo_Elem type ref to If_Wd_Context_Element,ls_context type wd_this-element_ENABLE,lw_name type string. lw_name = wdevent-GET_string( TAB ).node lo_Node = wd_Context-get_Child_Node( Name = ENABLE ).getribute lo_Node-get_Sic_Attributes( i

3、mporting Sic_Attributes = ls_context ). IF lw_name cs TAB .clear:ls_context-T1. ELSEIF lw_name cs TAB_1.clear:ls_context-T2. ELSEIF lw_name cs TAB_2.clear:ls_context-T3. ELSEIF lw_name cs TAB_3.clear:ls_context-T4. ENDIF.bind structure lo_Node-bind_structure( new_item = ls_context SET_INITIAL_ELEMEN

4、TS = abap_true ).endmethod.7,点击method list 编辑wdnit 方法，代码如下：method WDNIT . data: lo_Node type ref to If_Wd_Context_Node,lo_Elem type ref to If_Wd_Context_Element,ls_context type wd_this-element_ENABLE.node lo_Node = wd_Context-get_Child_Node( Name = ENABLE ).getribute lo_Node-get_Sic_Attributes( importing Sic_Attributes = ls_co ntext ). ls_context-T1 = abap_true. ls_context-T2 = abap_true. ls_context-T3 = abap_true. ls_context-T4 = abap_true.* bind structure lo_Node-bind_structure( new_item = ls_context SET_INITIAL_ELEMENTS =