PGM
DCL VAR(&ROUGE) TYPE(*CHAR) LEN(1) VALUE(X'28')
DCL VAR(&MESS) TYPE(*CHAR) LEN(100) ...
Type: Messages; Utilisateur: K2R400
PGM
DCL VAR(&ROUGE) TYPE(*CHAR) LEN(1) VALUE(X'28')
DCL VAR(&MESS) TYPE(*CHAR) LEN(100) ...
Il faut concatener un code hexa contenant la couleur avec ton message.
Exemble
CHGVAR &MES VALUE( x'22' tcat &MES).
Le message sera en White
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.