1

Cookieの例（ここにhttp://www.atozed.com/intraweb/docs/Develop/Cookies.aspxを表示）とまったく同じようにすべてを実行しましたが、コンパイルされておらず、「[DCCエラー] Login.pas （38）：E2035「実際のパラメーターが不足しています」および「WebApplication.Response.Cookies.Add」の直後にコースを配置します

私は何が欠けていますか？用途に追加する必要のあるユニットはありますか？

私はDelphiXE2とIntraweb2.1.23を使用していますが、intrawebは初めてです...

ありがとうございます

4

3 に答える 3

3

httpappが uses 句にあることを確認し、次のようにしてみてください。

procedure TIWServerController.SetCookie;
var
  mCookie: TCookie;
begin
  mCookie := WebApplication.Response.Cookies.Add;
  with mCookie do begin
    Name:='mycookie';
    Value:='mycookievalue';
    Expires := Date + 30;
  end;
end;
于 2012-07-16T12:55:35.507 に答える
2

これは、Intraweb12.2.8XE2でCookieを作成する作業コードブロックです。

必ずuses句にIW.HTTP.Cookieを追加してください。

もちろん、iwformに一致するようにTiwfrmMainを変更し、プロシージャを宣言する必要があります:) via：procedure MakeCookie; あなたの中で 

procedure TiwfrmMain.MakeCookie;
    var cookieMain: THttpCookie;

begin

 try
  cookieMain:=  THttpCookie.Create('email',editLogin.Text,'',Date + 999);
  WebApplication.Response.Cookies.Add(cookieMain);
  cookieMain.free;  
 except

 end;

end;

そして、次の方法で入手することもできます。

procedure TiwfrmMain.SetCookie;
begin
  try


    if WebApplication.Request.CookieFields.IndexOfName('email')> -1 then
    editLogin.Text := WebApplication.Request.CookieFields.Values['email'];


  except

  end;

end;

njoy :)

于 2012-10-26T10:44:28.227 に答える