Help~

解决方案 »

  1.   

    我是在程序中动态申请的WebBrowser
    wb  :=  TWebBrowser.Create(Form1);
    TWinControl(wb).Parent  :=  Form1;
    wb.Align  :=  alright;
    每次申请完都free在重新开始,用个Timer来控制的,可能和cookie有关,
    知道的大虾Help Me~
      

  2.   

    找到cookie目录
    uses 
      Registry; function GetDirectory: string; 
    var 
      reg : TRegistry; 
    begin 
      reg := TRegistry.Create; 
      try 
        reg.RootKey := HKEY_LOCAL_MACHINE; 
        reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\Cache\Special Paths\Cookies', 
          False); 
        Result := reg.ReadString('Directory'); 
      finally 
        reg.Free; 
      end; 
    end; procedure TForm1.Button1Click(Sender : TObject); 
    var 
      s : string; 
    begin 
      S := GetDirectory; 
      ShowMessage(GetDirectory); 
    end; 将该目录清空