你好 Stedward McKnight

我要检查CL_GUI_TEXTEDIT实例的DELETE_TEXT方法是否没有

在内部代码中看起来像是这样。

 ct_text_editor-> delete_text（）。

刷新it_tline。
     通话功能" READ_TEXT"
       出口
 *客户= SY-MANDT
         id ='ST'
         语言='E'
         名称= txtname
         object ='TEXT'
       桌子
         行数= it_tline。
     如果sy-subrc <> 0。
     万一。
   万一。

   刷新：文本行。
   循环到it_tline，进入wa_tline。
     SHIFT wa_tline左侧删除领先空间。
     将wa_tline附加到文本行。
   结局。
 * *用文本行填充容器
   呼叫方法editor2-> set_text_as_r3table
     出口
       表格=文字行
 *表= it_tline
     例外情况
       其他= 1。
 
 

嗨

您可以尝试以下任何一种方法：

CL_GUI_TEXTEDIT类中的
• obj-> free（）
• DELETE_TEXT。
• 调用方法CL_GUI_CFW => FLUSH。

或者您可以用空行初始化（文本行为空）

调用方法text_editor-> set_text_as_r3table
      出口
            表格=文字行
      例外情况
            others = 1。

致谢，

Venkat

谢谢，但我看不到您关于左侧textedit控件实例化的逻辑。 请按照Mateusz的要求提供整个逻辑，PBO，PAI等。

嗨

这是我的工作代码。 请与您的代码进行比较并进行必要的更改。

 FORM set_texteditor。
   创建对象editor_container
     出口
       container_name ='TEXTEDITOR'
     例外情况
       cntl_error = 1
       cntl_system_error = 2
       create_error = 3
       lifetime_error = 4
       lifetime_dynpro_dynpro_link = 5。
 如果text_editor是INITIAL。
   创建对象text_editor
     出口
       父= editor_container
       wordwrap_mode = cl_gui_textedit => wordwrap_at_fixed_position
       wordwrap_position = line_length
       wordwrap_to_linebreak_mode = cl_gui_textedit => true。

   调用方法text_editor-> set_toolbar_mode
     出口
       工具栏模式= cl_gui_textedit => false。

   调用方法text_editor-> set_statusbar_mode
     出口
       statusbar_mode = cl_gui_textedit => false。

       调用方法text_editor-> delete_text。  "请添加此行以明确
 万一。


 ENDFORM。  " SET_TEXTEDITOR
 

问候，

Venkat

嗨， Sandra Rossi ， Mateusz Adamus

非常感谢！ 我的问题解决了，
我只是使用此代码。

 FORM free_container。

   如果container1不是初始的。
     调用方法container1-> free。
   万一。
   如果container2不是初始的。
     调用方法container2-> free。
   万一。
   如果编辑器不是INITIAL。
     调用方法编辑器->免费。
   万一。
   如果editor2不是初始的。
     调用方法编辑器2->免费。
   万一。

    清除：container1，container2，editer，editor2。
 ENDFORM。