Re: Champ saisie email et cliquable

Posté par Vortex le 3/8/2007 17:42:20

Cela ne devrait pas être trop dur...

Tout d'abord, occupons nous de l'interface.
Dans le code "a chaque modification", placez le code suivant :

SI VérifieExpressionRégulière(MoiMême, "[-.a-z0-9_]+[@][-.a-z0-9_]+[.][a-z]{2,4}") ALORS
MoiMême..Couleur = iVertFoncé
MoiMême..CurseurSouris = curFlèche
SINON
MoiMême..Couleur = iRougeClair
MoiMême..CurseurSouris = curCaret
FIN

En gros, ça change la couleur et le curseur souris si le texte saisi correspond à une adresse email.

Ensuite, pour le clic lui même, il suffit d'ajouter un traitement "Bouton gauche relaché" et d'y placer le code suivant:

SI VérifieExpressionRégulière(MoiMême, "[-.a-z0-9_]+[@][-.a-z0-9_]+[.][a-z]{2,4}") ALORS
LanceAppliAssociée("mailto:"+MoiMême)
FIN

De cette façon, lors d'un clic de souris, le client de messagerie par défaut va être ouvert avec l'adresse saisie dans le champs destinataire.