Impressão do DAMDFE e Eventos ( Resolvido )

[Leonardo Marcelino]

Boa tarde...

A impressão está saindo com caracteres inválidos nas palavras acentuadas e cedilhas...

Estou usando o Fortes no trunk2

Como posso resolver...

Desde já, agradeço...

Editado 10 Setembro, 2015 por Leonardo Marcelino

[Juliomar Marchetti]

Boa tarde!

Poderia anexar exemplo ou prints dos PDF para que possamos aplicar as devidas correções!

[Leonardo Marcelino]

Segue exemplos...

Obrigado.

Evento.pdf

MDF-e.pdf

[Juliomar Marchetti]

Correção aplicada!

favor baixar e testar!

[Leonardo Marcelino]

Boa tarde, Juliomar.

Após atualizar meus fontes, a impressão ainda continua errada, porém, verifiquei o seguinte:

Quando abro os arquivos ACBrMDFeDAEventoRLRetrato.dfm e ACBrMDFeDAMDFeRLRetrato.dfm pelo bloco de notas
o caption dos labels estão com os caracteres corretos de acordo com as correçóes que você fez.

Porém...

Quando abro os mesmo arquivos pelo Delphi 7 o caption dos labels aparecem da seguinte forma:

NÚMERO
DATA E HORA DE EMISSÃO
PROTOCOLO DE AUTORIZAÇÃO DE USO
ETC...

Alguma dica?

Obrigado pela atenção...

Leonardo.

[Régys Silveira]

O problema é que os arquivos estão em UTF8 e o Delphi 7 só trabalha com ANSI, enviei uma possível correção, favor atualizar e verificar.

[Juliomar Marchetti]

Sim Régys já havia notado , preciso pegar esse e o arquivo também do DACTe modificar a codificação e repassar nas strings arrumando!

assim ficará correto

[Leonardo Marcelino]

Muito obrigado caros colegas...

Problema resolvido!

[Daniel Simoes]

Prezados... (Regys e Juliomar)

Nessas Units de DANFEs... elas precisam estar em ANSI, para mantermos a compatibilidade com o D7

E por elas serem ANSI, quando houver uma atribuição de String em run-time, e essa String contiver acentos... é necessário usar o ACBrStr() na operação... caso contrário não funcionará nas IDEs modernas (XE, Lazarus) , que usam UTF8... (no D7 o método ACBrStr() não faz nenhuma conversão)

Exemplo:

lblDadosDoProduto.Caption := ACBrStr('CONTINUAÇÃO DOS DADOS DO PRODUTO / SERVIÇOS');

 

[Juliomar Marchetti]

Certo Daniel!

mas para que isso pudesse ser feito foi necessário mudar os arquivos todos para ANSI pois alguns ainda estavam em UTF-8

[Daniel Simoes]

SIM, isso mesmo... ;)