Delphi 如何在DataSnap服务器中访问请求头？

我使用的是DelphiXe7。我需要访问DataSnap服务器中的请求头，但它似乎没有此选项。在DataSnap REST中，这是可能的，因为

TWebModule

可用

此代码不起作用，如在REST中：

function TServerMethods1.EchoString(Value: string): string;
var
   Module: TWebModule;
begin
  Module := GetDataSnapWebModule;
  Result := Module.Request.RemoteIP + ': ' + Value;
end;

---

有人对DataSnap Server有什么想法吗？

我更新了我的REST项目，并解决了access标题中的问题。使用以下代码：

需要在使用时声明Web.HTTPApp

var
  oWebModule: TWebModule;
  sHeader: String;
begin
  oWebModule := GetDataSnapWebModule;
  sHeader := oWebModule.Request.Content;
end;