Test semaphore

4D v20.6

Test semaphore


Test 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

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