delphi idhttp管理池

代码说明：

idhttp在webservice里的应用，使用idhttppool管理。   TIdHttpPool = class(TComponent)   private     fPoolParameter:RPoolParameter;     fPoolList:TComponentList;     fPoolIdCookie:TComponentList;     fCleanTimer:TTimer;