Conversão de Caracteres (AnsiString para String)

[ubaltino]

Boa tarde.

Estou vendo que resolveram estender o suporte ao Delphi 7 por mais tempo. "Talvez" isto tenha a ver com esta alteração.

Na unit PcnRetinutNFe na function TRetInutNFe.LerXml: Boolean; existe a linha 140

      (*DR08 *)FxMotivo  := Leitor.rCampo(tcStr, 'xMotivo');

FxMotivo é tipo String;

e Leitor.rCampo retorna uma Variant. E ai, se o campo for tipo String, faz uma chamada em assim:

     tcStr     : result := ReverterFiltroTextoXML(ConteudoTag);

Mas ReverterFiltroTextoXML retorna um AnsiString;

Dai no Delphi Seatlle o Motivo fica com erros de acentuação. Tudo bem que não é nada crítico, mas fica parecendo que somos incompetentes né.

Eu acho alterando ReverterFiltroTextoXML para retornar String resolve isso.

 

 

[EMBarbosa]

18 horas atrás, ubaltino disse:

Estou vendo que resolveram estender o suporte ao Delphi 7 por mais tempo. "Talvez" isto tenha a ver com esta alteração

Não tem não. O anúncio explica o motivo.

19 horas atrás, ubaltino disse:

Eu acho alterando ReverterFiltroTextoXML para retornar String resolve isso

Por favor, se quiser reportar algum problema, dê informações completas de como reproduzir.

Se quiser sugerir uma correção, anexe o arquivo alterado com a correção.

[ubaltino]

Ok. Tudo bem. Eu não afirmei que era a causa. Disse "talvez".

Mas e a questão do erro de conversão? No momento que pega a resposta de uma NFe Inutilizada usando o Delphi Seatlle?

Será que é só eu que estou passando por isso?

[EMBarbosa]

3 horas atrás, ubaltino disse:

Ok. Tudo bem. Eu não afirmei que era a causa. Disse "talvez".

Eu não disse que você afirmou que era a causa. Se ler novamente meu post notará que eu só citei você. Não fiz nenhuma afirmação sobre o que você disse ou não.

3 horas atrás, ubaltino disse:

Mas e a questão do erro de conversão? No momento que pega a resposta de uma NFe Inutilizada usando o Delphi Seatlle?

Já expliquei como proceder, veja abaixo:

4 horas atrás, EMBarbosa disse:

Por favor, se quiser reportar algum problema, dê informações completas de como reproduzir.

Se quiser sugerir uma correção, anexe o arquivo alterado com a correção.

 

3 horas atrás, ubaltino disse:

Será que é só eu que estou passando por isso?

Sinceramente, não sei...

[ubaltino]

Obrigado