如何在 DataSnap Server 中访问请求 headers？

Question

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

此代码无法正常工作，就像在 REST 中一样：

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

有人知道 DataSnap Server 吗？

Answer 1

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

需要在使用时声明Web.HTTPApp

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

如何在 DataSnap Server 中访问请求 headers？

How to access request headers in DataSnap Server?

delphi

delphi-xe7

datasnap