Test semaphore

Test semaphore ( sémaphore ) : Boolean

Paramètre	Type		Description
sémaphore	Text	→	Nom du sémaphore à tester
Résultat	Boolean	←	Vrai = le sémaphore existe, Faux = le sémaphore n’existe pas

Description

La commande Test semaphore permet de tester l’existence d’un sémaphore.

A la différence de la fonction Semaphore, Test 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").

Exemple

Cet exemple permet de connaître l’état d’un traitement (en l’occurrence, la modification d’un code) sans modifier le sémaphore :

 Open window(x1;x2;y1;y2;-Palette window)
 Repeat
    If(Test semaphore("Code d’encryptage"))
       GOTO XY($x3;$y3)
       MESSAGE("Code d'encryptage en cours de modification.")
    Else
       GOTO XY($x3;$y3)
       MESSAGE("Modification du code d'encryptage autorisée.")
    End if
 Until(StopInfo)
 CLOSE WINDOW

Voir aussi

CLEAR SEMAPHORE
Semaphore

Propriétés

Numéro de commande	652
Thread safe	✓