Thanks Ondrej Kelle for answering this: uses System.SysUtils, Web.HTTPApp,
Soap.WebBrokerSOAP; function TTest.CallMe: string; var WebDispatcher: IWebDispatcherAccess; begin Result := ''; if Supports(GetSOAPWebModule, IWebDispatcherAccess, WebDispatcher) then Result := Format('You are calling me from: %s', [WebDispatcher.Request.RemoteIP]); end; Source: [WayBack] web services – Accessing the original TWebRequest object in a Delphi
SOAP Server – Stack Overflow –jeroen
Weiterlesen...