delphi中操作cookie,为什么我写不对呀

我的代是这样写的。先用webbrowser的组件打开网址..
          procedure TForm1.RadioButton6Click(Sender: TObject);
           begin
           if trim(edit4.text)='' then
            begin
             showmessage('请输入地址')
            end
           else
           begin
           WebBrowser2.Navigate(Edit4.Text);
           end;
           end;然后将得到的cookie送给memo7
       procedure TForm1.WebBrowser2DocumentComplete(Sender: TObject;
          const pDisp: IDispatch; var URL: OleVariant);
          begin
          Doc:=Webbrowser2.Document as IHTMLDocument2;
          memo7.Text:=Doc.cookie;
          end;
                     从理论上。我可以再把memo7的值重新修改一下.然后再赋给doc.cookie。那这时cookie就改变了.但是实际上却不行。我的问题是: 原因是为什么不行
            第二希望能一个正确并修改cookie和得到cookie的实例.代码..
           有没有其他的方法可以得到cookie和修改cookie.
                     因为公司要我写一个自动登录的。而对方站点是以cookie方式认证的.但是却需要每一天都登录才会生效。所以得用一个这样的软件每一次打开都自动输入网址和把cookie一并放上去。然后这样自自然然的登录了。。思路是这样。请各位牛人解答一下...如果好。还可以加分