01-21-2019, 10:17 PM
Hi Bob. If i understand correctly, i use a variable {$IFDEF DEBUG} to develop and deploy, something like:
Code:
procedure TIWServerController.IWServerControllerBaseCreate(Sender: TObject);
begin
{$IFDEF DEBUG}
SSLOptions.NonSSLRequest := nsAccept;
{$ELSE}
SSLOptions.NonSSLRequest := nsRedirect;
{$ENDIF}
end;
