* really all TMonitor shortcuts pass through the results

rtl/inc/monitor.inc

@@ -200,7 +200,7 @@ end;
 function MonitorTryEnter(Const aObject: TObject): Boolean;
 
 begin
-  TMonitor.TryEnter(aObject);
+  Result:=TMonitor.TryEnter(aObject);
 end;