Consumir Webservice em Delphi Seattle

[ivan_juste]

Boa tarde aos amigos.

Meu software possui uma integração ( via webservice) com uma empresa para envio de SMS. Esta integração foi feita em Delphi 7 e já esta em produção a alguns meses. 

Utilizo componente Indy --> http.post

Estou realizando a migração deste sistema para o Delphi Seattle e me deparei com o seguinte erro no momento do Post: "HTTP/1.1 500 Internal Server Error" nesta rotina de integração.

var vRetorno : String;
    vLista : TStringList;
    vHTTP : TIdHTTP;
begin
   vLista := TStringList.Create;

  vHTTP:= TIdHTTP.Create(nil);
  vHTTP.URL.Port:= Porta;
  if TipoOperacao = 'VerCredito' then
  begin
    //..Consulta crédito
    vLista.Add('NumUsu='+NumUsu+'&Senha='+Senha);
    vRetorno :=  vHTTP.Post('http://webservices.twwwireless.com.br/reluzcap/wsreluzcap.asmx/VerCredito?',vLista);
  end;
end;

 

Pelo que encontrei pesquisando, este erro pode estar relacionado com alguma mudança nos métodos nas diferentes versões do Delphi. Em anexo duas imagens, do método nas duas versões do Delphi.

 

Alguém poderia me ajudar a entender o problema?

 

Obrigado a todos.