unit hicURL_perform; interface uses Kol,Share,Debug; type THIcURL_perform = class(TDebug) private public _prop_+URL:string; _prop_Cookies:string; _prop_Method:byte; _prop_##Proxy: _prop_Type:byte; _prop_Host:string; _prop_Port:integer; _prop_ProxyUser:string; _prop_ProxyPass:string; _prop_##: _prop_##HTTPAuthType: _prop_Basic:byte; _prop_Digest:byte; _prop_NTLM:byte; _prop_Negotiate:byte; _prop_##: _prop_##HTTPAuth: _prop_User:string; _prop_Password:string; _prop_##: _data_Cookies:THI_Event; _data_URL:THI_Event; procedure _work_doPerform(var _Data:TData; Index:word); end; implementation procedure THIcURL_perform._work_doPerform; begin end; end.