如何访问 DataSnap Server 中的请求标头？答案

【问题标题】：How to access request headers in DataSnap Server?如何访问 DataSnap Server 中的请求标头？
【发布时间】：2016-11-25 11:53:50
【问题描述】：

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

此代码不起作用，就像在 REST 中一样：

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

有人知道 DataSnap Server 吗？

【问题讨论】：

标签： delphi delphi-xe7 datasnap

【解决方案1】：

我为 REST 更新了我的项目，并解决了我在访问 Header 时遇到的问题。使用以下代码：

需要在使用时声明Web.HTTPApp

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

【讨论】：