把一個容器分爲N×M格子的形式
把一個容器分爲很多個,每個顯示不同的圖片<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />
**分裂容器
DATA ref_splitter TYPE REF TO cl_gui_splitter_container.
DATA:ref_pic_left TYPE REF TO cl_gui_picture,
ref_pic_right TYPE REF TO cl_gui_picture.
DATA:cell_1_1 TYPE REF TO cl_gui_container,
cell_1_2 TYPE REF TO cl_gui_container.
DATA:l_url1 TYPE cndp_url, " URL地址
l_url2 TYPE cndp_url. " URL地址
PBO裏的代碼:
IF my_container IS INITIAL.
CREATE OBJECT my_container
EXPORTING
container_name = 'CONTROL_AREA1'
EXCEPTIONS
OTHERS = 1.
*****分裂容器
把容器分爲2×3的6個小格子
CREATE OBJECT ref_splitter
EXPORTING
parent = my_container
rows = 2
columns = 3
EXCEPTIONS
OTHERS = 1.
* 第一個
CALL METHOD ref_splitter->get_container
EXPORTING
row = 1
column = 1
RECEIVING
container = cell_1_1.
* 第二個
CALL METHOD ref_splitter->get_container
EXPORTING
row = 1
column = 2
RECEIVING
container = cell_1_2.
*配置第一個
CREATE OBJECT ref_pic_left
EXPORTING
parent = cell_1_1
EXCEPTIONS
OTHERS = 1.
*第二個
CREATE OBJECT ref_pic_right
EXPORTING
parent = cell_1_2
EXCEPTIONS
OTHERS = 1.
*定義圖片地址
l_url1 = 'http://t3.baidu.com/it/u=3399704954,2909084794&fm=3&gp=41.jpg'
.
CALL METHOD ref_pic_left->load_picture_from_url
EXPORTING
url = l_url1
EXCEPTIONS
OTHERS = 1.
l_url2 = 'http://t10.baidu.com/it/u=2954044487,1626568478&fm=3&gp=1.jpg'
.
CALL METHOD ref_pic_right->load_picture_from_url
EXPORTING
url = l_url2
EXCEPTIONS
OTHERS = 1.