Waldir Paim

Segue pequena correção no código. ACBrDevice.pas

@alessandro pancotte Fiz um ajuste e agora primeira testa pelo nome e só se não encontrar faz o teste para verificar se é impressora na rede. Segue unit alterada. ACBrDevice.pas

@Daniel Simoes Posso avaliar sim, ainda hoje me organizo para fazer uns testes aqui.

Sem problemas, estamos ai para ajudar no que for preciso.

@Daniel Simoes A finalização proposta está correta e o funcionamento também. A implementação existente gerava um leak interno na lib pois não obedece a ordem de finalização.

@Daniel Simoes Essa alteração é para finalizar corretamente a biblioteca XMLSec. O patch segue a mesma sequencia de chamada de funções do exemplo oficial, no link: https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c. Conforme exemplo, as primeiras funções chamadas são xmlSecDSigCtxDestroy() e xmlFreeDoc(): https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c#L204 https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c#L208 e a send_file() por sua vez é chamada aqui: https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c#L113 após ela, são chamadas xmlSecCryptoShutdown(), xmlSecCryptoAppShutdown(), xmlSecShutdown(), xsltCleanupGlobals() e xmlCleanupParser(): https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c#L118 https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c#L121 https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c#L124 https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c#L129 https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c#L131 Apensar do exemplo ter a chamada a função xsltFreeSecurityPrefs(), preferi não declará-la no patch pois não tenho certeza se o ACBr instancia alguma variável do tipo xsltSecurityPrefsPtr. De qualquer forma, a linha que contém a chamada a essa função, é: https://github.com/lsh123/xmlsec/blob/master/examples/sign1.c#L128

@matheusd Fizemos alguns testes e estudamos o código fonte da RandScreen. Ela é realmente lenta pois gera uma imagem do desktop e disso ela gera a randomização. _randPoll RandPoll, realmente é muito mais eficiente e segundo respostas no forum oficial da lib é o mais indicado para essa situação. Fizemos uma implementação que ficou bem próxima da que você propôs e nos nossos testes mostraram que o processo ficou bem mais rápido. @Daniel Simoes Aproveitamos o embalo e fizemos também a correção na finalização da XMLSec que possuía um pequeno bug, pois finalizava alguns métodos fora da ordem. Se puder analisar ambas units, se precisar de mais algum ajuste estamos a disposição para qualquer duvida. Segue anexo: ACBrDFeOpenSSL.pas ssl_openssl_lib.pas

@matheusd Fizemos uma pergunta no forum oficial da openssl e estamos aguardando a resposta deles. Assim que recebermos uma resposta lá conseguimos colaborar de forma segura.

@matheusd Ainda estamos testando e não definimos a melhor solução, mas acredito que podemos juntos encontrar uma solução seja tecnicamente aceitável e compatível com a versão atual da lib. Estamos até verificando a possibilidade de atualizar a reader da lib para uma versão mais nova.

@Daniel Simoes Pedi ajuda ao parceiro nosso e acredito que podemos contribuir para solução descrita no tópico. Chegamos num consenso que o parâmetro não deve ser removido e sim substituído por outro mais eficiente. Ainda estamos testando mas o mais promissor até agora foi: Vamos continuar nos testes e assim que possível poderemos propor um patch para ajudar na solução da lentidão descrita no método randScreen().

@guilhermeinfo1 Use essa configuração BAUD=2400 DATA=8 PARITY=N STOP=1

Remoção de avisos adicionados recentemente nas units em anexo. ACBrBancoCaixa.pas ACBrBancoCaixaSICOB.pas

@Andrade. Pode testar com essa versão? Fiz mais alguns ajustes. ACBrDevice.pas

Segue unit com problema da comunicação da porta paralela resolvida. ACBrDevice.pas

@Daniel Simoes Fiz alguns testes e consegui identificar 02 probleminha nessa atualização do modo RAW. 1 - Erro na impressão usando porta paralela. Apresentada erro na impressão pois está selecionado modo RAW e não dtFile como deveria. Fiz um ajuste para selecionar dtFile quando for porta paralela. 2 - Não chega ser um erro mas não localiza a impressora quando ela está na rede. Fiz o ajuste para permitir identificar nome da impressora em rede em modo RAW. Segue anexo. ACBrDevice.pas

Segue remoção de remoção de avisos adicionados recentemente. ACBrDevice.pas ACBrTEFDCliSiTef.pas Atualização na unit. ACBrTEFDCliSiTef.pas. A variavel TemParcelas : Boolean não está mais em uso e foi mantida suas atribuições. ACBrTEFDCliSiTef.pas

@raosistemas Se precisar de ajuda para consumir a api acredito que possamos te ajudar.

@marcio.santos Qual Delphi você usa? Tem como resolver isso usando ClassHelper http://docwiki.embarcadero.com/RADStudio/XE8/en/Class_and_Record_Helpers_(Delphi) http://www.devmedia.com.br/novidades-da-linguagem-delphi-usando-class-helpers/12160

@doidopb Eu uso o mesmo valor sempre nos dois.

@doidopb Da uma lida na documentação: http://synapse.ararat.cz/doc/help/blcksock.TBlockSocket.html#SetSendTimeout

@doidopb Isso mesmo, ali você poe o seu timeout. Não se esqueça de liberar no firewall do seu sistema operacional host o protocolo ICMP. Segue link de alguns exemplos : http://wiki.locaweb.com.br/pt-br/Firewall_-_Liberando_pings

@doidopb Use a classe TPingSend da synapse. Segue função que utilizo: Declare na uses a unit pingsend function PingHost(const AHost: string; ATimeoutPing: integer; ASocksTimeout: integer): Boolean; var VPing: TPingSend; begin Result := False; if (AHost = '') then Exit; VPing := TPingSend.Create; try VPing.Sock.CloseSocket; VPing.Sock.Purge; VPing.Sock.SetTimeout(ASocksTimeout); VPing.Sock.SetSendTimeout(ASocksTimeout); VPing.Sock.SetRecvTimeout(ASocksTimeout); VPing.Timeout := ATimeoutPing; try Result := VPing.Ping(AHost); if Result then Result := (VPing.ReplyError = IE_NoError); except Result := False; end; VPing.Sock.CloseSocket; finally VPing.Free; end; end;

@EMBarbosa Resolvido.

@EMBarbosa Delphi Berlin 10.1 no Windows 10 64 bits.

@Juliomar Marchetti Entrei no perfil de ambos, e acredito tratar-se de outro assunto. Mas muito obrigado pelo retorno.