写、读cookies的问题

Question

procedure TWebModule1.WebModule1LoginAction(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
with Response.Cookies.Add do
    begin
      Name :='userID';
      Value:='030001';
      Secure := True; 
      Expires := Now + 1; 
    end;end;
//上面的写cookies已经成功。我在C:\Documents and Settings\Administrator\Cookies里能找到。我想在其它Actions中调用刚才写的cookies.
Request.CookieFields.Values['userID'];
每次读出的结果都是空的。请各位高手指点，是什么原因啊？
谢谢！

Answer 1

你写在Response里,当然不能用Request读。改成这样看看。
with Request.Cookies.Add do
    begin
      Name :='userID';
      Value:='030001';
      Secure := True; 
      Expires := Now + 1; 
    end;

Answer 2

with Request.Cookies.Add do
/////////////////////////////
Request没有Cookies属性，编译都过不了!

Answer 3

Secure := False; 
就可以了。