如何使用SAPGUI画图

本篇内容主要讲解“如何使用SAP GUI画图”，感兴趣的朋友不妨来看看。本文介绍的方法操作简单快捷，实用性强。下面就让小编来带大家学习“如何使用SAP GUI画图”吧!

十年的六安网站建设经验，针对设计、前端、开发、售后、文案、推广等六对一服务，响应快，48小时及时工作处理。成都全网营销推广的优势是能够根据用户设备显示端的尺寸不同，自动调整六安建站的显示方式，使网站能够适用不同显示终端，在浏览器中调整网站的宽度，无论在任何一种浏览器上浏览网站，都能展现优雅布局与设计，从而大程度地提升浏览体验。创新互联从事“六安网站设计”,“六安网站推广”以来，每个客户项目都认真落实执行。

国内80后上的编程课应该都学过 Logo 这门编程语言：

Logo语言是一门专门设计用来进行编程教学的语言，于1967年由Wally Feurzeig, Seymour Papert 和 Cynthia Solomon 发明的。

下图是用Logo语言画出来的图案。

如何使用SAP GUI画图

Perhaps I practiced it in Pentium 386? I could not remember it clearly.

同样，在SAPGUI里内发现有一个非常古老的ABAP包，最后一次修改已经是22年前的1995年了。这比SAP成都研究院很多新同事的年龄都要大。

如何使用SAP GUI画图

这个包提供了一个HPGL接口。Hewlett-Packard Graphics Language，简称为HPGL，是一种打印机控制语言，由 Hewlett-Packard 设计。

下面是我用ABAP代码写的一个HPGL控制台，可以调用函数GRAPH_HPGL，像小时候使用Logo语言那样在屏幕上作图。

REPORT z.
DATA: go_text_edit      TYPE REF TO cl_gui_textedit,
      go_cust_container TYPE REF TO cl_gui_custom_container,
      ok_code           TYPE sy-ucomm.
DATA  lt_text(256) TYPE c OCCURS 0.DATA: BEGIN OF lt_hpgl OCCURS 1,
        entry(128),
      END OF lt_hpgl.
CALL SCREEN 0101.MODULE status_0101 OUTPUT.
  SET PF-STATUS 'JERRY_CONSOLE'.
  SET TITLEBAR 'JERRY_TITLEBAR'.  IF go_cust_container IS INITIAL.
    go_cust_container = NEW #( container_name = 'CUSTOM_CONTROL' ).
    CREATE OBJECT go_text_edit
      EXPORTING        parent                     = go_cust_container
        wordwrap_mode              = cl_gui_textedit=>wordwrap_at_fixed_position
        wordwrap_to_linebreak_mode = cl_gui_textedit=>false.  ENDIF.
ENDMODULE.
MODULE user_command_0101 INPUT.
  ok_code = sy-ucomm.  CASE ok_code.
    WHEN 'BACK' OR 'QUIT' OR 'EXIT'.
      LEAVE TO SCREEN 0.
    WHEN 'EXECUTE'.
      CLEAR: lt_text, lt_hpgl[].
      go_text_edit->get_text_as_r3table( IMPORTING table = lt_text ).
      LOOP AT lt_text ASSIGNING FIELD-SYMBOL().
         APPEND INITIAL LINE TO lt_hpgl ASSIGNING FIELD-SYMBOL().
         -entry = .
      ENDLOOP.
      CALL FUNCTION 'GRAPH_HPGL'        TABLES
          data = lt_hpgl.    WHEN OTHERS.  ENDCASE.ENDMODULE.

The PBO and API for screen 101:

如何使用SAP GUI画图