ITPub博客

首页 > Linux操作系统 > Linux操作系统 > ABAP 选择屏幕上添加按钮,按钮上添加文字和图片

ABAP 选择屏幕上添加按钮,按钮上添加文字和图片

原创 Linux操作系统 作者:hzq2010 时间:2011-03-28 23:08:27 0 删除 编辑
TABLES: sscrfields.
TYPE-POOLS:slis,ole2.
TYPE-POOLS icon.
* 选择屏幕

SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN BEGIN OF BLOCK  b1 WITH FRAME TITLE t1. "选择屏幕块
              p_cityfr TYPE s_from_cit.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF LINE.
 SELECTION-SCREEN PUSHBUTTON 7(20) but1 USER-COMMAND search. " 定义搜索按钮
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
INITIALIZATION.
t1 = '检索条件'.
"but1 = '搜  索'.
  CALL FUNCTION 'ICON_CREATE' " 给按钮添加图标和文本
    EXPORTING
      name   = ICON_SEARCH   " 按钮的图片的名字
      text   = '搜   索'                   "按钮的文本
      info   = 'Search'
    IMPORTING
      RESULT = but1
    EXCEPTIONS
      OTHERS = 0.
ABAP 选择屏幕上添加按钮,按钮上添加文字和图片 - Lisa -  Road

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/23495244/viewspace-691173/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2010-03-11

  • 博文量
    196
  • 访问量
    168010