Test semaphore
Test semaphore ( semaphore ) : Boolean
| 引数 | 型 | 説明 | |
|---|---|---|---|
| semaphore | Text | → | テストするセマフォ | 
| 戻り値 | Boolean | ← | True: セマフォが存在する, False: セマフォは存在しない | 
説明
Test semaphore コマンドは、セマフォの存在をテストします。
Semaphore関数とTest semaphore関数の違いは、Test semaphoreはセマフォが存在しない場合にはsemaphoreを作成しないということです。semaphoreが存在している場合、関数はTrueを返します。そうでない場合はFalseを返します。
例題
下記の例は、セマフォを変更せずにプロセスの状態 (この場合は、コードを変更して
いる最中かどうか) を知ることを可能にするものです:
 $Win:=Open window(x1;x2;y1;y2;-Palette window)
 Repeat
    If(Test semaphore("Encrypting code"))
       POSITION MESSAGE($x3;$y3)
       MESSAGE("Encrypting code being modified.")
    Else
       POSITION MESSAGE($x3;$y3)
       MESSAGE("Modification of the encrypting code authorized.")
    End if
 Until(StopInfo)
 CLOSE WINDOW
参照
プロパティ
| コマンド番号 | 652 | 
| スレッドセーフである | ✓ |