Emulates exec.library/ObtainSemaphoreShared.
Source position: MUIClass.Base.pas line 290
public procedure TMUISemaphore.ObtainShared;