wda學(xué)習(xí)案例6tabtrip與close事件

1、一、需求Tabtrip 每一個(gè)tab 上有 關(guān)閉按紐.點(diǎn)擊其,可以隱掉該tab。結(jié)果如圖 1 所示：圖 1二、實(shí)現(xiàn)1,在view 中畫出來控件tabstrip，然后點(diǎn)右鍵 insert tab 四次出現(xiàn)四個(gè)tab。2,在context 中定義四個(gè)wdy_變量，分別為t1,t2,t3,t4.3,對(duì)四個(gè) tab 控件的屬性進(jìn)行填寫.4,點(diǎn)擊 tab 屬性visible 的binding 按鈕，讓其分別于 context 的變量進(jìn)行綁定。5,填寫 tabstrip 屬性，其中事件 onClose 的欄位中寫一個(gè)on_close 方法，6,雙擊 on_close,進(jìn)入代碼編輯器，代碼如下：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,點(diǎn)擊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 =