http://www.intelligo.net/iedelphi/
看那个IECache,多好的站点呀...你要的全有,
举个小例子(用到了TIECache,在上面这个站点下载)
var
Url, FileName, Expire : String;
ExpireDT : TDateTime;
begin
Url:='C:/Temp/test.htm';
FileName:='C:/Temp/test.htm';
Expire:='01-03-01 00:00:00';
ExpireDT:=StrToDateTime(Expire);
IECache1.CopyFileToCache(Url, FileName, NORMAL_CACHE_ENTRY, ExpireDT);
end;