实战SAP：【总结】文本编辑器

1. 在SCREEN 100 中创建一个定制控制，命名为PP

代码如下：

 

*&---------------------------------------------------------------------* *& Report ZTESTA_01 *& *&---------------------------------------------------------------------* *& *& *&---------------------------------------------------------------------* REPORT ztesta_01. DATA: ok_code TYPE sy-ucomm, save_ok LIKE ok_code. *定制控制 编辑对象定义 DATA container TYPE REF TO cl_gui_custom_container. DATA editor TYPE REF TO cl_gui_textedit. DATA: init, m1(256) TYPE c OCCURS 0, line(256) TYPE c. line = '请输入：'. APPEND line TO m1. CALL SCREEN 100. REFRESH m1. CALL METHOD editor->get_text_as_r3table IMPORTING table = m1. LOOP AT m1 INTO line. WRITE / line. ENDLOOP. *&---------------------------------------------------------------------* *& Module STATUS_0100 OUTPUT