DELPHI这么多的人气与高手，居然无人应答，寒

function GetShellFolder(aName: string): string;
const
  SCookieKey = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
var
  Reg: TRegistry;
begin
  Result := '';
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    if Reg.OpenKey(SCookieKey, False) then
      Result := Reg.ReadString(aName);
  finally
    Reg.Free;
  end;
end;

procedure DelSomeFile(aFolder, aPattern: string);
var
  vFound: Integer;
  SearchRec: TSearchRec;
begin
  vFound := FindFirst(aFolder + '\' + aPattern, faAnyFile, SearchRec);
  while vFound = 0 do begin
    if (SearchRec.Attr and faDirectory) = 0 then
      DeleteFile(aFolder + '\' + SearchRec.Name); //删除文件
    vFound := FindNext(SearchRec);
  end;
  FindClose(SearchRec);
end;
----------------------------
  DelSomeFile(GetShellFolder('Cookies'), '*@qq*.txt');
  DelSomeFile(GetShellFolder('Cookies'), '*@cgi-bin*.txt');

楼上的办法是从系统删除所有 Cookie文件，但不知删除后，WebBrowser中能否
知道已清空Cookie，再次提交时无Cookie.还要试!

经试验，从系统删除所有cookie文件后，WebBrowser访问网站时，仍不能清除掉
Cookie,因为内存中仍有一份Cookie,它再被写入系统Cookie目录中。
得另想办法，但仍非常感谢楼上的高手。再邦邦我想想办法，
我想在WebBrowser访问某网站后，伪造新的Cookie,但微软为了安全的缘故，
只添加新Cookie,不能改写或删除原Cookie,保护了原Cookie,合法手段是
无法实现的了

Set the cookie to a date in the past, thereby expiiiring it.

网页的COOKIE是受保护的，没法伪造Cookie了,
两个帐号用两个IE窗口同时登录CSDN，因为只有一个套COOKIE，
会被认为是一个人所为，没法超越三次发贴，但这难不倒人，用两台电脑，用UDP组成主/从
机，这就两套Cookie了，呵呵，它们轮流自动发贴，这就是灌水机了，当然，不是为难CSDN，
学点技术罢了

网页的COOKIE是受保护的，没法伪造Cookie了,
两个帐号用两个IE窗口同时登录CSDN，因为只有一个套COOKIE，
会被认为是一个人所为，没法超越三次发贴，但这难不倒人，用两台电脑，用UDP组成主/从
机，这就两套Cookie了，呵呵，它们轮流自动发贴，这就是灌水机了，当然，不是为难CSDN，
学点技术罢了

-----------------
强人 BCB(天下三分明月夜,二分无赖是扬州)