Jump to content

2 Dia do ACBr

O Dia da Automação Comercial está chegando!
Inscreva-se

Nova Loja Oficial
loja.projetoacbr.com.br
Ajude o projeto a crescer, com estilo

Comprar

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

lucasherrera

Out of Memory ao gerar Bloco X de Estoque

Recommended Posts

4 horas atrás, Juliomar Marchetti disse:

Bom dia.

uma dúvida funciona seu código no delphi 7 e lazarus?

Juliomar só testei no delphi 7 e esta funcionando, lazarus infelizmente não testei.

 

36 minutos atrás, Daniel Simoes disse:

Acho que as modificações não irão corrigir o problema em definitivo... pois mesmo trabalhando com TFileStream... no final da rotina, você move isso para uma String (FXMLOriginal)...

  FXMLOriginal := ConverteXMLtoUTF8(LendoArquivo.Text);
  LendoArquivo.Free;
  if Assinar then
    FXMLAssinado := TACBrBlocoX(FACBrBlocoX).SSL.Assinar(FXMLOriginal, 'ReducaoZ', 'Mensagem');

e a rotina de assinatura da ACBrDFeSSL, trabalha apenas com Strings e não com Stream

Então Daniel o uso do TFileStream foi para tentar montar o arquivo mais rápido mesmo, pelo que recordo nos testes que fiz deu uma boa diferença para montar ele como TFileStream, inicialmente tinha usado uma TStringList.

Com relação a assinatura quando tentei usar pelo ACBR levou 10 min pelo que recordo, dai acabei fazendo a assinatura por "fora" com outra rotina que já existia no meu sistema.

  • Like 1

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...