一个很方便、高效的线程池代码，取自卢伟的DELPHI专栏。封装的几乎完美，用法也超简单，可以根据使用者设定的初始工作线程数和最大线程数以及线程执行时间自动增加工作线程。这是第二次发布的线程池代码，解决了第一版中线程池Free时提示：“不能结束工作中的工作者线程（资源死锁）”问题。部分代码片断请看下截图。