模仿.Net ThreadPool的线程池控件

http://www.2ccc.com/btdown.asp?articleid=5953

ftp://download:S3cirpYW3DoR@www.2ccc.com/vcl/system/20120301114502_ThreadPool.rar

Delphi线程池控件说明:
模仿.Net的ThreadPool类的功能。
控件关键属性:
  MaxThreadCount,MinThreadCount设置池中最大最小线程数量,默认为0,线程即用即释放。
  ThreadWorkFinished在线程执行完任务后触发,这里提供了一个时机释放传递给限制执行的指针内存
控件关键方法:QueueUserWorkItem。
          传递一个TWaitCallback类型的函数指针
          一个TWaitCallback函数的参数指针
          一个指示ThreadWorkFinished事件中释放需要释放资源的Boolean型参数
控件发布人:Henreash
Blog:blog.csdn.net/henreash

 

posted @ 2014-10-11 15:45  IAmAProgrammer  阅读(300)  评论(0编辑  收藏  举报