如何在DataSnap Server中访问请求标头？

Question

我正在使用Delphi XE7。我需要访问DataSnap Server中的请求标头，但似乎没有这个选项。在DataSnap REST中，这是可能的，因为TWebModule可用。

这个代码不劳逸结合，如：

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

没有人有DataSnap服务器的想法？

Answer 1

我更新我的项目REST，并解决了我的问题访问标头。用下面的代码：

需要申报Web.HTTPApp在使用

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