在這一篇中將學(xué)習(xí)一下cl_gui_picture這個(gè)Control,以及實(shí)現(xiàn)如何添加context_menu.

???? ci_gui_picture實(shí)現(xiàn)起來(lái)很簡(jiǎn)單，具體為：創(chuàng)建一個(gè)cl_gui_picture的實(shí)例，然后調(diào)用LOAD_PICTURE方法用來(lái)顯示圖片。具體來(lái)說(shuō)又三個(gè)load_picture的方法，第一個(gè)是LOAD_PICTURE_FROM_SAP_ICONS，第二個(gè)是LOAD_PICTURE_FROM_URL以及第三個(gè)LOAD_PICTURE_FROM_URL_ASYNC。

???? 在Picture中添加Context_menu實(shí)現(xiàn)起來(lái)也比較簡(jiǎn)單。首先定義一個(gè)cl_gui_picture的context_menu，在該事件中創(chuàng)建一個(gè)cl_ctmenu的實(shí)例，然后調(diào)用?cl_ctmenu的ADD_FUNCTION方法來(lái)添加需要顯示的menu。再定義一個(gè)context_menu_selected事件，該時(shí)間用來(lái)實(shí)現(xiàn)選擇menu之后的后續(xù)動(dòng)作。

???? 接下來(lái)將以一個(gè)實(shí)例來(lái)說(shuō)明實(shí)現(xiàn)上述操作。在該實(shí)例中首先顯示一種圖片，然后再該圖片上添加context menu，選擇context menu可以對(duì)該圖片進(jìn)行拉伸處理,此外還實(shí)現(xiàn)了圖片的double click事件。具體步驟如下:

?????一，創(chuàng)建一個(gè)屏幕號(hào)為100的screen，在該screen中添加一個(gè)名稱為"PIC_CON"的custom container.

???? 二，定義cl_gui_custom_container對(duì)象container_1 以及cl_gui_picture對(duì)象PIC_CON。代碼如下：

?????????data?PIC_CON?type?ref?to?cl_gui_picture.
????? data?container_1?type?ref?to?cl_gui_custom_container.??????

???? 三，定義一個(gè)名為event_receiver1的class，該class中包括了三個(gè)方法event_handler_context_menu以及event_handler_context_menu_sel和event_handler_picture_dblclick。具體代碼為:

????? ???class?event_receiver1?definition.
???????????? public?section.
????????????????methods?event_handler_picture_dblclick
????????????????????????? ??for?event?picture_dblclick?of?cl_gui_picture
????????????????????????? ??importing?mouse_pos_x?mouse_pos_y?sender.
??????????????? methods?event_handler_context_menu
???????????????????? ??????for?event?context_menu?of?cl_gui_picture
??????????????????????? ???importing?sender.
????????????? ??methods?event_handler_context_menu_sel
?????????????????????????? for?event?context_menu_selected?of?cl_gui_picture
?????????????????????????? importing?fcode?sender.
??????????endclass.????????????????????"event_receiver?DEFINITION???

???? 四，實(shí)現(xiàn)class中定義的方法。在方法event_handler_context_menu中首先創(chuàng)建一個(gè)cl_ctmenu的實(shí)例menu，然后調(diào)用menu的ADD_FUNCTION方法添加menu，最后調(diào)用DISPLAY_CONTEXT_MENU方法顯示context menu?。在方法event_handler_context_menu_sel中首先獲取選中menu的function code,然后調(diào)用picture的SET_DISPLAY_MODE方法來(lái)對(duì)圖片進(jìn)行拉伸或者正常顯示處理。在方法event_handler_picture_dblclick方法中將獲取鼠標(biāo)雙擊的問(wèn)題，然后以message的方式顯示位置。具體代碼如下：

?class?event_receiver1?IMPLEMENTATION.
??METHOD?event_handler_picture_dblclick.
*????????for?event?picture_dblclick?of?c_picture_control
*????????importing?mouse_pos_x?mouse_pos_y.
????DATA?pos_x(5)?type?c.
????DATA?pos_y(5)?type?c.
????pos_x?=?mouse_pos_x.
????pos_y?=?mouse_pos_y.

????IF?SENDER?=?PIC_CON.
??????MESSAGE?I000(0K)?WITH
????????'DoubleClick'?'Upper?Picture'?POS_X?POS_Y.??????????"#EC?NOTEXT
????endif.
??endmethod.????????????????????"event_handler_picture_dblclick

??method?event_handler_context_menu.
????DATA?menu?type?REF?TO?cl_ctmenu.
????CREATE?OBJECT?menu.
????CALL?METHOD?menu->ADD_FUNCTION
??????EXPORTING
????????FCODE???????=?'NORMAL'
????????TEXT????????=?'NORMAL'
*????????ICON????????=
*????????FTYPE???????=
*????????DISABLED????=
*????????HIDDEN??????=
*????????CHECKED?????=
*????????ACCELERATOR?=
????????.
????CALL?METHOD?menu->ADD_FUNCTION
??????EXPORTING
????????FCODE???????=?'STRETCH'
????????TEXT????????=?'STRETCH'
*????????ICON????????=
*????????FTYPE???????=
*????????DISABLED????=
*????????HIDDEN??????=
*????????CHECKED?????=
*????????ACCELERATOR?=
????????.
????CALL?METHOD?sender->DISPLAY_CONTEXT_MENU
??????EXPORTING
????????CONTEXT_MENU?=?menu
*??????EXCEPTIONS
*????????ERROR????????=?1
*????????others???????=?2
????????????.
??endmethod.?????????????????????"event_handler_picture_dblclick

??method?event_handler_context_menu_sel.
????if?fcode?=?'STRETCH'.
??????CALL?METHOD?PIC_CON->SET_DISPLAY_MODE
????????EXPORTING
??????????DISPLAY_MODE?=?CL_GUI_PICTURE=>DISPLAY_MODE_STRETCH.
????endif.
????if?fcode?=?'NORMAL'.
??????CALL?METHOD?PIC_CON->SET_DISPLAY_MODE
????????EXPORTING
??????????DISPLAY_MODE?=?CL_GUI_PICTURE=>DISPLAY_MODE_NORMAL.
????endif.
??endmethod.????????????????????"event_handler_context_menu_sel
ENDCLASS.????????????????????"event_receiver?IMPLEMENTATION??????

????? 五，定義event_receiver1對(duì)象，以及cntl_simple_events和cntl_simple_event對(duì)象。主要用于事件注冊(cè)時(shí)候使用。為什么是這么使用我還沒(méi)有弄清楚。

????? ?data?url??type?cndp_url.
???? data?event_receiver?TYPE?REF?TO?event_receiver1.
?????data?event_tab?type?cntl_simple_events.
???? data?event_tab_line?type?cntl_simple_event.??????

????? 六，在PBO的module中創(chuàng)建custom container以及cl_gui_custom_container的實(shí)例，然后調(diào)用LOAD_PICTURE_FROM_URL_ASYNC方法顯示圖片，并進(jìn)行事件注冊(cè)。具體代碼為：

?MODULE?STATUS_0100?OUTPUT.
??SET?PF-STATUS?'MAIN0001'.
*??SET?TITLEBAR?'xxx'.
??IF?PIC_CON?IS?INITIAL.
????CREATE?OBJECT?container_1
??????????????exporting?container_name?=?'PIC_CON'.
????CREATE?OBJECT?PIC_CON?exporting?parent?=?container_1.
????CALL?FUNCTION?'DP_PUBLISH_WWW_URL'
??????EXPORTING
????????OBJID????=?'HTMLCNTL_TESTHTM2_SAP_AG'
????????LIFETIME?=?cndp_lifetime_transaction
??????IMPORTING
????????URL??????=?url
??????EXCEPTIONS
????????OTHERS???=?1.
*?Load?the?picture?by?using?the?url?generated?by?the?data?provider.
????if?sy-subrc?=?0.
??????CALL?METHOD?PIC_CON->LOAD_PICTURE_FROM_URL_ASYNC
????????EXPORTING
??????????url?=?url.
????endif.

????EVENT_TAB_LINE-EVENTID?=?CL_GUI_PICTURE=>EVENTID_PICTURE_DBLCLICK.
????append?EVENT_TAB_LINE?to?EVENT_TAB.
????EVENT_TAB_LINE-EVENTID?=?CL_GUI_PICTURE=>EVENTID_CONTEXT_MENU.
????append?EVENT_TAB_LINE?to?EVENT_TAB.
????EVENT_TAB_LINE-EVENTID?=?CL_GUI_PICTURE=>EVENTID_CONTEXT_MENU_SELECTED.
????append?EVENT_TAB_LINE?to?EVENT_TAB.
????CALL?METHOD?PIC_CON->SET_REGISTERED_EVENTS
??????EXPORTING
????????EVENTS?=?event_tab.

????create?object?event_receiver.
????set?handler?event_receiver->event_handler_picture_dblclick
????????????????FOR?PIC_CON.
????set?handler?event_receiver->event_handler_context_menu
????????????????FOR?PIC_CON.
????set?handler?event_receiver->event_handler_context_menu_sel
????????????????FOR?PIC_CON.
??EndIF.

ENDMODULE.?????????????????"?STATUS_0100??OUTPUT

????? ok.大功告成，可以F8了！

總結(jié)

以上是生活随笔為你收集整理的GUI_PICTURE以及context_menu学习笔记的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。