Vous êtes sur le site Web historique de la documentation de 4D. Les documentations sont progressivement déplacées vers developer.4d.com |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D v20 R7
Tester semaphore
|
Tester semaphore ( sémaphore ) -> Résultat | ||||||||
Paramètre | Type | Description | ||||||
sémaphore | Chaîne |
![]() |
Nom du sémaphore à tester | |||||
Résultat | Booléen |
![]() |
Vrai = le sémaphore existe, Faux = le sémaphore n’existe pas | |||||
La commande Tester semaphore permet de tester l’existence d’un sémaphore.
A la différence de la fonction Semaphore, Tester semaphore ne crée pas le sémaphore s’il n’existe pas.
Si le sémaphore existe, la fonction retourne Vrai, s’il n’existe pas elle retourne Faux.
Note : Attention, 4D tient compte de la casse des caractères en ce qui concerne les noms de sémaphores (le programme considère par exemple que "MonSémaphore" est différent de "monsémaphore").
Cet exemple permet de connaître l’état d’un traitement (en l’occurrence, la modification d’un code) sans modifier le sémaphore :
Creer fenetre(x1;x2;y1;y2;-Fenêtre palette)
Repeter
Si(Tester semaphore("Code d’encryptage"))
POSITION MESSAGE($x3;$y3)
MESSAGE("Code d'encryptage en cours de modification.")
Sinon
POSITION MESSAGE($x3;$y3)
MESSAGE("Modification du code d'encryptage autorisée.")
Fin de si
Jusque(StopInfo)
FERMER FENETRE
Produit : 4D
Thème : Process (Communications)
Numéro :
652
Nom intl. : Test semaphore
Créé : 4D v6.5
4D - Langage ( 4D v20 R7)