Delphi中完成端口的例子

Delphi的Internet\ISAPIThreadPool.pas单元，是一个完成端口的完整例子，有时间可以研究一下，简单看了一下，好象非常简单。代码出自高人，应该值得学习。