Ir para conteúdo
  • Cadastre-se

Leao

Membros
  • Total de ítens

    446
  • Registro em

  • Última visita

Tudo que Leao postou

  1. Olá, tive problema com o arquivo synautil.pas, na verdade existia o mesmo em outra pasta e o diretório estava na lista path do delphi, faça uma pesquisa no seu hd, pode encontrar... Leão
  2. Solivan, seu método é muito bom, seria possível compartilhar pelo menos para atualizar o execultavel? Obrigado, Leão
  3. Leao

    Vazamento de memória

    Pois é Juliomar, não veja a faca nem o queijo, gostaria de encontrar o fio a meada... delphi7, win7 trunk2 Obrigado, Leão
  4. Leao

    Vazamento de memória

    Em anexo Isso depois que compila, ao fechar aplicação, essa tela
  5. Leao

    Vazamento de memória

    Olá, meus aplicativos que usa os componentes Acbr, depois de compilar ao sair, seguinte mensagem: delphi 7, win7, trunk2, depois que atualizei para trunk2, tenho nfe, boletos e mdfe, uso somente fortereport Alguém tiver solucionado, post aqui, Obrigado, Leão
  6. Italo, deu certo, muito obrigado, Leão
  7. Olá Italo, vou fazer o teste obrigado, Leão
  8. Olá, (conforme o exemplo mdf-e) visando gravar informações básica, estou com dificuldade para pegar o retorno de: Consultar carregando xml já testei assim: if (ACBrMDFe1.WebServices.Retorno.cStat = 100) or (ACBrMDFe1.WebServices.Retorno.cStat = 101) or (ACBrMDFe1.WebServices.Retorno.cStat = 132) or (ACBrMDFe1.WebServices.Retorno.cStat = 135) then begin if ACBrMDFe1.WebServices.Retorno.cStat = 100 then begin DDADOS.Modifica; DDADOS.STATUS.Conteudo :='AUTORIZADO'; DDADOS.Post; end; //somente para exemplificar falta o 101,132 e 135, end; if (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 100) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 101) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 132) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 135) then begin if ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 100 then begin DDADOS.Modifica; DDADOS.STATUS.Conteudo :='AUTORIZADO'; DDADOS.Post; end; end; ======================{ agora Encerramento }============================= if (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 101) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 132) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 135) then begin como faço para pegar o retorno? ===================={ agora Cancelamento }================================ if (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 101) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 135) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xEvento='Cancelamento') then begin Nenhum desses exemplos deu certo, gostaria que alguém informasse um exemplo de cada um (Consulta com xml, Cancelamento e Encerramento). Obrigado, Leão
  9. Leao

    Email

    Carlos, veja pelo demo, estar correto e funcionando smtp.gmail.com
  10. Leao

    Email

    Olá Carlos, pode ser isso aqui: É preciso fazer modificação no gmail, para envier nf-e e boleto entre na conta gmail e na opção MINHA CONTA No meu caso, uso o GMail, e para funcionar precisei liberar a opção "Acesso para aplicativos menos seguros" nas configurações de segurança da conta. Sem isso, não envia de jeito nenhum. Leão
  11. Olá, agradeço a todos mas o detalhe era estava tentando instalar de outra pasta d:\temp\ Copie para a C:\Program Files (x86)\Borland\Delphi7\Fortesreport-ce Depois executei o instalador frceInstall.exe Instalou certinho, fica aqui a dica. Obrigado, Leão
  12. Olá Docfabio, desistalei o forte do delphi, tirei do path, e execultei o instalador frceInstall.exe, ele não encontra o frce.dpk, mas o mesmo estar na pasta onde baixei. Ainda aguardo....
  13. Olá Earmarques, estou instando também pelo instalador frceInstall.exe conforme instruções: Remover o Package da versão antiga do Delphi Remover os diretórios da versão antiga do Lib Path do Delphi Apagar os fontes e DCUs, e BPLs da versão antiga baixei pelo link https://github.com/fortesinformatica/fortesreport-ce/trunk Parece que tem que instalar primeiro o frce.dpk procurei o fórum do forteReport mas não estou conseguindo, peço ajuda... Leão
  14. Peço desculpa aos moderadores por postar aqui sobre esse assunto, se possível me informe o caminho procurei pelo fórum e não encontrei.... Obrigado, Leão
  15. mas veja http://www.projetoacbr.com.br/forum/topic/24840-erro-ao-instalar-trunk2/#comment-160658 erro ao instalar Fatal: File not found: 'frce.dpk' esse arquivo escontra-se na pasta D:\Temp\outros\Packages
  16. Olá, baixei e ao instalar error: arquivo com o erro em anexo Borland Delphi Version 15.0 Copyright (c) 1983,2002 Borland Software Corporation Fatal: File not found: 'frce.dpk' Compilation failure Como solucionar, arquivo não encontrar estar na pasta de instalação D:\Temp\outros\Packages frce.dpk Obrigado, Leão log_Delphi_7.txt
  17. Olá Daniel, conseguir baixar, muito obrigado, Leão
  18. Daniel, não consigo baixar através dos links informados Para baixar o Fortes Report CE por SVN, use o endereço: https://github.com/fortesinformatica/fortesreport-ce/trunk Para baixar o Fortes Report CE por GIT, use o endereço: https://github.com/fortesinformatica/fortesreport-ce.git Leão
  19. Olá, no MDF-e, como faço para pegar o hdrecbto ao Criar\Enviar? na NFe- é assim: DNF.HORA_AUTORI.Conteudo :=DateTimeToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.dhRecbto); Obrigado, Leão
  20. Olá Turbo, faça uma busca PNGImage, inclusive tem o componente pronto para instalar e usar, em delphi7 Obrigado, Leão
  21. Olá Daniel, certinho, era isso mesmo corrigido. ==========={ local }=============== tot.qCTe := 2; tot.vCarga := 3500.00; // UnidMed = (uM3,uKG, uTON, uUNIDADE, uLITROS); tot.cUnid := uTon; tot.qCarga := 2.8000; with lacres.Add do begin nLacre := '123'; end; infAdic.infCpl := 'Empresa optante pelo Simples Nacional.; Caminhao VW.'; infAdic.infAdFisco := ''; end; ACBrMDFe1.Manifestos.GerarMDFe; end; Muito obrigado, Leão
  22. Sim Italo, infMDFe.versao:= onde vejo que valores atribuir a mesma? Obrigado, Leão
  23. Olá Italo, em nenhum local informei infMDFe.Versao, somente verproc=1.1.1
  24. Onde encontra-se infMDFe.Versao não localizo
×
×
  • 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...