Webサーバーアプリでユーザーの情報を得る

Webサーバーアプリで閲覧者のホスト名やブラウザの種類を調べる方法です
これらは Requestのプロパティで簡単に取得できます。

■ Webサーバーアプリでユーザー情報を取得する例 
  procedure TWebModule1.WebModule1WebActionItem2Action(Sender: TObject;
    Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);

  begin
    //リモートアドレス
    S[0] := Request.RemoteAddr;
    //リモートホスト名
    S[1] := Request.RemoteHost;
    //ブラウザ名
    S[2] := Request.UserAgent;
    Response.Content  :=  PageProducer1.Content;
  end;