Delphi SOAP service: only publish WSDL in RELEASE mode
Posted by jpluimers on 2018/08/21
If you want to restrict the WSDL publishing so it only is published in DEBUG mode, then add a [WayBack] TWSDLHTMLPublish to your [WayBack] TWebModule descendant, then add this in the [WayBack] OnCreate event handler of that TWebModule descendant:
// Enable/disable handling of "/wsdl*" requests during DEBUG/RELEASE mode. Enabling sends them via
// Handled := WSDLHTMLPublish1.DispatchRequest(Sender, Request, Response);
{$ifdef DEBUG}
WSDLHTMLPublish1.WebDispatch.Enabled := True;
{$endif DEBUG}
{$ifdef RELEASE}
WSDLHTMLPublish1.WebDispatch.Enabled := False;
{$endif DEBUG}
end;
I have limited this because there are so many hard coded strings in the TWSDLHTMLPublish, see the thread by [WayBack] Marjan Venema at [WayBack] Hide WSDL document in SOAP app – delphi
–jeroen
The Wiert Corner - irregular stream of stuff 
Leave a comment