经过数日折磨之后终于确定是TMonitor存在BUG @_@,问题主要来自于Wait和Pulse这组函数。因为Generics.Collections.TThreadedQueue同样使用了TMonitor来同步,所以TThreadedQueue也有BUG。Classes.TThreadList也使用TMonitor,不过因为里面没有用到Wait函数,所以并TThreadList可以正常使用。