Ir para conteúdo
  • Cadastre-se

rogercon

Membros
  • Total de ítens

    296
  • Registro em

  • Última visita

Tudo que rogercon postou

  1. segue o log. Usando o demo posprinterteste.exe também ocorre a mesma situação. log.txt
  2. Boa Noite, Utilizando o acbrposprinter, quando escolho o modelo PPTEXTO, as impressões não quebram as linhas, então a dúvida é se utilizando o PPTEXTO devo quebrar a linha manualmente com algum comando..... O problema também ocorreu utilizando o demo. obrigado
  3. Sérgio, já entendi, ficou claro, temos que nos adaptar.... blza... Mas eu te pergunto, se o spooler da impressora estiver com erro, e de dentro da aplicação você tenta imprimir, simplesmente trava a aplicação, não adianta try except em lugar algum, não deveria ter um tratamento para isso ? o cliente final não tem culpa se a impressora x é na porta com emulada, ou se é direto na porta, ou se é via spooler, o que não pode é travar a aplicação.....
  4. Ok então a solução é usarmos sempre direto o nome da porta. Assim teremos o tratamento. Ok. Blza. Se não tem jeito paciência. Mas uma dúvida me surgiu... E no caso da impressora epson tm t20 por exemplo? Pois ela nao cria uma com né, e sim uma usb001, ou usb002 etc... Dá certo chamar a impressão usando usb001 ?
  5. Refiz o teste com a impressora na com4. 1 - se chamar pelo nome da porta ou qualquer outro nome consigo entrar no except e/ou imprimir. 2 - agora, se eu chamar pelo nome do driver da impressora instalada no windows dai ocorrem duas situacoes: A - se a impressora estiver online imprime normalmente. B - se a impressora estiver em estado de erro daí não entra no exception Parece algo haver com o nome do driver ja em uso ou algo assim.
  6. Este nao é o problema. Da uma olhada no que mencionei acima.
  7. Bom, funcionou em partes, pelo que entendi é o seguinte, tenho uma bematech mp 4200 instalada e funcionando na porta COM11 Se eu passar acbrposprinter1.porta:='COM11' daí entra no except em caso de algum erro, ou senão imprime normalmente. mas se eu passar acbrposprinter1.porta:='MP-4200 TH' daí não entra no except em caso de algum erro, ou senão imprime normalmente. 1 - se a mp-4200 th estiver em estado de erro, é ai que não entra no except 2 - se ela estiver online, imprime normal ACBrPosPrinter1.Modelo := ppEscBematech; ACBrPosPrinter1.Porta := 'MP-4200 TH'; acbrposprinter1.ControlePorta:=false; acbrposprinter1.VerificarImpressora:=true; mimp := TMemo.Create(nil); mimp.parent := self; mimp.visible := false; mimp.lines.add('</zera>'); mimp.lines.add('teste'); mimp.lines.add('teste'); mimp.lines.add('teste'); mimp.lines.add('</corte_total>'); try frmprincipal.acbrposprinter1.ativar; except showmessage('erro ao ativar'); end; frmprincipal.ACBrPosPrinter1.imprimir(mimp.text); frmprincipal.acbrposprinter1.desativar; freeandnil(mimp);
  8. ainda não resolveu, coloquei verificarimpressora True. Tem algo haver eu estar passando CONTROLEPORTA:= TRUE ?
  9. Tentei. Nao entrou no except e continua congelando a aplicação.
  10. Quando a impressora está off-line por algum motivo(cabo desconectado, drive não instalado ou porta com incorreta), realmente não entra no except, já tentei... try frmprincipal.ACBrPosPrinter1.imprimir(mimp.text); except on E: EInOutError do begin mostrarmensagem('Erro de comunicação com a impressora.','Erro de comunicação com a impressora. '+e.message+#13+'Classe: '+e.classname,'ERRO'); end; on e: Exception do begin showmessage('ERRO AO IMPRIMIR'); END; end;
  11. Boa Noite, Utilizando o componente acbrposprinter1, ao tentar imprimir caso a impressora não tenha sido encontrada a aplicação trava e congela. Existe alguma forma de tratar esta excessão ? reparei que no evento do componente possui algumas coisas mas no demo não tem nada.... O erro também ocorreu utilizando o demo. obrigado
  12. Pelo que eu notei, era porque eu estava tentando usar rodando pelo delphi, depois que rodei diretamente o exe, foi.
  13. também estou com este problema. Já atualizei os fontes e dei build na aplicação.
  14. estou fazendo assim para enviar, mvendaenviar:=Tmemo.create(nil); mvendaenviar.visible:=false; mvendaenviar.parent:=self; mVendaEnviar.lines.text := ACBrSAT1.CFe.GerarXML(true); // True = Gera apenas as TAGs da aplicação frmprincipal.mLog.lines.Add('Venda Gerada'); ACBrSAT1.EnviarDadosVenda(mVendaEnviar.text); freeandnil(mvendaenviar);
  15. tanto pela aplicação quanto pelo software da tanca, recebo SAT EM OPERACAO, estou usando um sat tanca sdk, as luzes ligado, operação, rede, e parametrizado estão ok, além do cf-e sat pendente piscando....
  16. rogercon

    Erro ao enviardadosvenda()

    Galera, ao executar o método ACBrSAT1.EnviarDadosVenda(mVendaEnviar.text); minha aplicação fecha sozinha, notei que o erro ocorre no arquivo acbrsat.pas na linha abaixo, o que será que está errado ? if EstaVazio(SATResp) then SATResp := fsSATClass.EnviarDadosVenda( dadosVenda );
  17. E quando tenho 6 ctes, ambos teem a mesma uf de origem e a mesma uf de destino, mesmo motorista, mesmo veículo, daí devo fazer apenas 1 mdfe ? pois se eu tentar fazer 1 mdfe para cda cte vai dar rejeição.
  18. cleannup no tortoise resolveu o problema.
  19. Pessoal, Deletei a pasta inteira do acbr, baixei denovo, e recebo o erro em anexo ao tentar rodar o instalador. Obrigado a todos.
  20. [RESOLVIDO] era falha minha aqui, não passando o CUF correto.
  21. Bom dia, Ao executar o comando para validar a nfce conforme abaixo, recebo o seguinte erro: "UF não pode ser vazia" showmessage(acbrnfce.configuracoes.WebServices.uf); acbrnfce.notasfiscais.validar; O componente está devidamente carregado, coloquei um showmessage ali para me certificar que estava com a uf devidamente preenchida...... daí olhando os fontes do acbr, abri o arquivo ACBRDFE.PAS e notei que o parâmetro UF da procedure LerServicoDeParams está chegando vazio. "trecho do código" procedure TACBrDFe.LerServicoDeParams(const ModeloDFe, UF: String; const TipoAmbiente: TpcnTipoAmbiente; const NomeServico: String; var Versao: Double; var URL: String); var Sessao, NomeSchema, ArqSchema: String; VersaoAchada, VersaoSchema: Double; begin if EstaVazio(ModeloDFe) then raise EACBrDFeException.Create('ModeloDFe não pode ser vazio'); if EstaVazio(UF) then raise EACBrDFeException.Create('UF não pode ser vazia'); Obrigado a todos desde já.
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...