Source position: objpash.inc line 624
class procedure TMonitor.Enter(
const aObject: TObject
); overload;class function TMonitor.Enter(
const aObject: TObject;
aTimeout: Cardinal
):Boolean; overload;