webbrowser 问题跪求高手

Question

我用delphi webbrowser 开发了一个内部专用浏览器。可是访问过的网址都会被  ie 的历史记录给记下来了。
怎么样能让　webbrowser　访问过的地址不被记住呢？
跪求高手帮助。这个问题我已经找了几个月了，就是没找到方法，急啊！！！！！！！！！！

Answer 1

采用删除的方法
function funClearIE():boolean;
var
  lpEntryInfo : PInternetCacheEntryInfo;
  hCacheDir : LongWord;
  dwEntrySize : LongWord;
  dwLastError : LongWord;
begin  dwEntrySize := 0;
  FindFirstUrlCacheEntry(nil, TInternetCacheEntryInfo(nil^), dwEntrySize);
  GetMem(lpEntryInfo, dwEntrySize);
  try
    hCacheDir := FindFirstUrlCacheEntry(nil, lpEntryInfo^, dwEntrySize);
    if hCacheDir <> 0 then
      DeleteUrlCacheEntry(lpEntryInfo^.lpszSourceUrlName);
  finally
    FreeMem(lpEntryInfo);
  end;
  repeat
    dwEntrySize := 0;
    FindNextUrlCacheEntry(hCacheDir, TInternetCacheEntryInfo(nil^), dwEntrySize);
    dwLastError := GetLastError();
    if (GetLastError = ERROR_INSUFFICIENT_BUFFER) then
    begin
      GetMem(lpEntryInfo, dwEntrySize);
      try
        if FindNextUrlCacheEntry(hCacheDir, lpEntryInfo^, dwEntrySize) then
          DeleteUrlCacheEntry(lpEntryInfo^.lpszSourceUrlName);
      finally
        FreeMem(lpEntryInfo);
      end;
    end;
  until (dwLastError = ERROR_NO_MORE_ITEMS);
  Result:=true;
end;