Delphi 实现删除 IE 历史记录

最新Delphi 实现删除 IE 历史记录

以下是三零网为大家整理的最新Delphi 实现删除 IE 历史记录的文章，希望大家能够喜欢!

 

uses wininet; procedure TForm1.Button1Click(Sender: TObject); var cache_info:PInternetCacheEntryInfo; cbSizeOf_Cache_info:dword; hw:hwnd; buf:tstrings; begin new(cache_info); hw:=FindFirstUrlCacheEntryEx(nil,0,NORMAL_CACHE_ENTRY or URLHISTORY_CACHE_ENTRY,0,cache_info,@cbSizeOf_Cache_info,nil,nil,nil); if hw<>0 then begin DeleteUrlCacheEntry(cache_info.lpszSourceUrlName); while FindNextUrlCacheEntryEx(hw,cache_info,@cbSizeOf_Cache_info,nil,nil,nil) do DeleteUrlCacheEntry(cache_info.lpszSourceUrlName); end; FindCloseUrlCache(hw); dispose(cache_info); end;

 

延伸阅读:
·Delphi 实现删除本身程序
·Delphi 删除自身的程序
·Delphi 删除注册的ODBC 示例
·Delphi 禁止 DBGrid 按delete删除记录
·delphi 四种方法删除数据库重复记录示例
·【delphi sql语句】delphi常用SQl 语句：新建,删除,修改表结构
·Delphi删除或移动正在使用的文件
·Delphi编写的简易文件管理器代码
·Delphi 实现目录的复制、删除和移动
·Delphi想TStringGrid中添加和删除行的方法
·Delphi ListView 按标题删除项目
·Delphi 删除文件的扩展名
·Delphi删除指定驱动器的卷标，成功返回true