Aujourd'hui, j'ai appris une petite fonction et créé un bouton à l'écran. Je me souviens clairement que je l'ai appris avant, mais j'ai vite oublié et j'ai été déçu par ma mémoire
Hé, partageons plus pour l'oiseau stupide, allez, pamplemousse sucré
À propos de l'ajout de boutons d'écran
Trois:
1
icône types-pools.
tables sscrfields.
data functxt type smp_dyntxt. "Si vous ne voulez pas d'images, vous n'en avez pas besoin
2
écran de sélection: touche de fonction 1.
touche de fonction 2.
3
initialisation.
sscrfields-functxt_01 = 'Téléchargement du modèle'. "Bouton sans image
functxt-icon_id = icon_ws_plane.
functxt-icon_text = 'Téléchargement du modèle d'avion'. Bouton pour l'image
sscrfields-functxt_02 = functxt.
à l'écran de sélection.
cas sscrfields-ucomm.
quand 'FC01'
QUAND 'FC02'
Le code détaillé est le suivant
Icône TYPE-POOLS.
TABLES sscrfields.
Fonction DATA TYPE smp_dyntxt.
PARAMÈTRES: p_carrid TYPE s_carr_id,
p_cityfr TYPE s_from_cit.
ECRAN DE SELECTION: TOUCHE DE FONCTION 1,
TOUCHE DE FONCTION 2.
INITIALISATION.
functxt-icon_id = icon_ws_plane.
functxt-icon_text = '飞机模板下载'.
sscrfields-functxt_01 = functxt.
"functxt-icon_text = 'UA'.
sscrfields-functxt_02 = '模板下载'.
AT SELECTION-SCREEN.
CASE sscrfields-ucomm.
WHEN 'FC01'.
p_carrid = 'LH'.
p_cityfr = 'Frankfurt'.
WHEN 'FC02'.
p_carrid = 'UA'.
p_cityfr = 'Chicago'.
WHEN OTHERS.
...
ENDCASE.