Overblog
Editer l'article Suivre ce blog Administration + Créer mon blog
codeswindev.over-blog.com

Petit blog sur le Wlangage de PCSoft Je vais essayer dans ce petit blog à illustrer des exemples de codage en Wlangage, des trucs et astuces utiles sur les environnements Windev, Webdev et Windev Mobile. Je partage, si ça peut aider la communauté, au fur et à mesure que je découvrirai cet AGL. J'essayerai de ne pas être trop redondant avec ce qui est facile à trouver dans la doc. Bonne lecture.

Windev: Comment interdire le coller (CTRL + V) dans un champ de saisie ?

Vous pouvez interdire le coller dans un champ par une capture d'événement Windows.

Dans le code d'initialisation du champ, associez une procédure WLangage à l'événement envoyé par Windows au champ lorsqu'un "coller" est fait :

// Capture de l'événement de copie envoyé au champ par Windows...
// Où SAI_MotPasse est le champ où l'on souhaite interdire le coller

Evénement("CollerInterdit", SAI_MotPasse, WM_PASTE)

//************************//

Créez une procédure locale dans la fenêtre, avec le code suivant :

PROCEDURE CollerInterdit()

// Réponse à l'événement Windows WM_PASTE : coller dans le champ
// Affichage d'un message d'information...
Info("La copie n'est pas autorisée dans ce champ, à votre clavier !")

// Inhibe le traitement standard Windows donc pas de coller...
_EVE.Retour = 0

//************************//


Notez que pour utiliser dans vos traitements des constantes de messages Windows, vous devez insérer la ligne suivante dans le code de votre projet :

EXTERNE "Winconst.wl"

Partager cet article
Repost0
Pour être informé des derniers articles, inscrivez vous :
Commenter cet article