SemaphorPost() – Sperre aufheben
Die Funktion hebt eine Sperre auf, die mit SemaphorEdit() gesetzt wurde.
|
Parameter |
Beschreibung |
|---|---|
|
aID:C |
ID der Sperre |
Rückgabewert
Logisch / Boolean - Sperre aufheben erfolgreich
Beispiel
| cID |
cID := 'test',
if SemaphorEdit(cID, false, false) then
WriteLn('ID ''' + cID + ''' wurde erfolgreich gesperrt'),
WriteLn('------'),
WriteLn('Beliebige Anweisungen ausführen'),
WriteLn('------'),
SemaphorPost(cID),
WriteLn('Sperre für ''' + cID + ''' wurde wieder aufgehoben'),
else
WriteLn('ID ''' + cID + ''' wurde bereits gesperrt'),
endif,