datilas

tenta assim:

eu coloco antes do ultimo end (End.) no form inicial do meu projeto e sempre funcionou, eu também uso danfe com fortes initialization rlconsts.setversion(3,72,'B');

amigo tente fazer assim:

decidi fazer esse topico pois vi que muitos amigos estão com problema em usar a imagem do captcha CPF/CNPJ que agora vem em PNG. eu baixei o componente : GraphicEx no link: http://www.soft-gems.net/index.php/all-downloads é só extrair o conteudo do arquivo GraphicEx.zip na pasta de sua escolha vai no delphi em tools -> environment options -> na aba library -> clica nos botao "..." em Library Path seleciona a pasta GraphicEx e clica em add agora no projeto adicione a uses: GraphicEx e no atualiza captcha do ACBrConsultaCNPJ é só usar assim: procedure TF_Principal.LabAtualizarCaptchaClick(Sender: TObject); var Stream: TMemoryStream; Img: TPNGGraphic; begin Stream:= TMemoryStream.Create; Img:= TPNGGraphic.Create; try ACBrConsultaCNPJ1.Captcha(Stream); Img.LoadFromStream(Stream); Image1.Picture.Assign(Img); EditCaptcha.Clear; EditCaptcha.SetFocus; finally Stream.Free; Img.Free; end; end; quero deixar claro que existem outros componentes e outras formas de fazer isso, mas é assim que eu estou usando, estou apenas querendo ajudar os que ainda tem dificuldade com eu tive. Segue o demo em delphi 7:ACBrConsultaCNPJ.zip

realmente, a citação acima é sobre o s executáveis gerado pelo delphi XE7, atualizei o xp instalei tudo que é pedido no faq da embarcadero e não consegui instalar, tive que instalar a maquina virtual com windows 7 mas muito obrigado a todos.

eu encontrei isso: As aplicações criadas com o Delphi XE7 rodam no Windows XP? A Microsoft já não comercializa nem suporta o Windows XP, então não o listamos como plataforma oficialmente suportada, ainda que se espere que as aplicações escritas com Delphi rodem bem no XP. Nada do que foi feito no Delphi teve como intenção remover o suporte ao XP como destino. nesse link: http://www.embarcadero.com/br/rad-sproducts/rad-studio/faq estou baixando as atualizações do xp para testar

estou tentando instalar o delphi xe7 update1 em uma maquina virtual com win xp, mas quando eu clico em Next a instalação simplesmente para (fecha) não da nenhuma mensagem de erro, eu gostaria de saber se alguém aqui do fórum conseguiu instalar no win xp, se sim como proceder, o que é necessário .

por acaso vc usa duas versoes na mesma maquina? (Borland Delphi Version 15.0 Copyright © 1983,2002 Borland Software Corporation retirado do log) caso positivo existe um tutorial para poder coexistir varias versões do delphi

aqui a opcao ACBrNFe.configurações.Arquivos.EmissaoPathNFe esta false, então usaria a data do computador, mas o sistema aqui bloqueia caso a data seja alterada, e o problema acima vem acontecendo em vários clientes, alguém esta passando por isso? alguém tem alguma ideia de como evitar isso?

ha algum tempo os clientes vem reclamando que alguns xml's estavam "sumindo" então verificando percebi que alguns xml's estavam na pasta ano/mês errada por exemplo: 51141124985723000155650010000003341000003342-nfe.xml este xml foi gerado,enviado,autorizado no mês 11 de 2014 mas foi salvo na pasta 201412, eu gostaria de saber qual o critério que o acbr usa para criar a pasta (data do computador, data da autorização,data da geração...); porque isso começou a acontecer em vários clientes.

a algum tempo atras só eram salvos na pasta ano/mes os xml's autorizados ou cancelados etc, mas apos uma atualização do acbr aqui na empresa o componente passou a salvar tambem os xml´s com os erros: 506 Rejeição: Data de Saída menor que a Data de Emissão 507 Rejeição: CNPJ destinatário/remetente ñ deve ser inform. em operação c/ exterior isso é normal?

realmente eu esqueci de zerar a variável Cont , e as vezes não retornava ncm nenhum.

Muito Obrigado pela ajuda, o jeito é fazer na unha mesmo.

aqui quando eu tento copiar a pasta acbr para o servidor svn ele não atualiza pois, vão juntos os arquivos de configuração do tortoise da pasta acbr e sem contar que quando é criado uma unit nova no acbr, eu tenho q add cada arquivo no servidor, eu gostaria de uma coisa mais automatica tipo "um svn dentro de outro"

aqui onde trabalho usamos o tortoise svn para compartilhar os projetos da empresa, mas tambem usamos para atualizar o acbr, eu gostaria de saber se alguem sabe como faço para colocar o acbr dentro do nosso servidor. para que quando alguem atualizar o acbr todos os outros, recebam a atualização junto com nossos projetos, sem ter que cada um atualizar o acbr

uma pequena alteração na linha 453 onde if Pos(ACBrStr('Não Disponível!'), Self.RespHTTP.Text) > 0 then foi alterado para if Pos(ACBrStr('tente novamente mais tarde'), Self.RespHTTP.Text) > 0 then pois estava retornando Exception mesmo quando o objeto era valido ACBrSedex.pas

muito obrigado vou tentar

eu fiz o componente AcbrSedex, mas estou com dificuldade de incrementar ele, pois eu vi que é possivel fazer calculo de sedex e rastrear objetos em um mesmo get, hoje funciona assim: ACBrSedex1.CodContrato := EdtContrato.Text; ACBrSedex1.Senha := EdtSenha.Text; ACBrSedex1.CepOrigem := EditCEPOrigem.Text; ACBrSedex1.CepDestino := EditCEPDestino.Text; ACBrSedex1.Peso := StrToFloatDef(EditPeso.Text,0); ACBrSedex1.Formato := TACBrTpFormato(cbFormato.ItemIndex); ACBrSedex1.MaoPropria := TACBrMaoPropria(cbMaoPropria.ItemIndex); ACBrSedex1.AvisoRecebimento := TACBrAvisoRecebimento(cbAvisoReceb.ItemIndex); ACBrSedex1.Comprimento := StrToFloatDef(EditComprimento.Text,0); ACBrSedex1.Largura := StrToFloatDef(EditLargura.Text,0); ACBrSedex1.Altura := StrToFloatDef(EditAltura.Text,0); ACBrSedex1.Servico := TACBrTpServico(cbServico.ItemIndex); ACBrSedex1.Diametro := StrToFloatDef(EditDiametro.Text,0); ACBrSedex1.ValorDeclarado := StrToFloatDef(EditValorDeclarado.Text,0); mas eu gostaria de fazer assim: ACBrSedex1.CodContrato := EdtContrato.Text; ACBrSedex1.Senha := EdtSenha.Text; ACBrSedex1.CepOrigem := EditCEPOrigem.Text; ACBrSedex1.CepDestino := EditCEPDestino.Text; ACBrSedex1.Peso := StrToFloatDef(EditPeso.Text,0); ACBrSedex1.Formato := TACBrTpFormato(cbFormato.ItemIndex); ACBrSedex1.MaoPropria := TACBrMaoPropria(cbMaoPropria.ItemIndex); ACBrSedex1.AvisoRecebimento := TACBrAvisoRecebimento(cbAvisoReceb.ItemIndex); ACBrSedex1.Comprimento := StrToFloatDef(EditComprimento.Text,0); ACBrSedex1.Largura := StrToFloatDef(EditLargura.Text,0); ACBrSedex1.Altura := StrToFloatDef(EditAltura.Text,0); ACBrSedex1.Servico.add(tiposervoco1); ACBrSedex1.Servico.add(tiposervoco2); ... ACBrSedex1.Diametro := StrToFloatDef(EditDiametro.Text,0); ACBrSedex1.ValorDeclarado := StrToFloatDef(EditValorDeclarado.Text,0); a duvida é como eu faço esse add qual o tipo de variavel, property ... ja olhei nos outros componentes do acbr mas não consegui entender

Pronto com rastreio, eu estava com muito serviço por isso demorei um pouco rasterio.zip

ok

è que eu tabem fiz esse: desculpa pela falha

eu transformei em componente segue em anexo: ACBRSedex.zip fico aguardando os testes

posta seu codigo ai, para eu poder analisar, e talvez colocar como mais uma opção de download, posta as funções que vc usa tambem.

Segue o Componente em anexo: ACBrNcm.zip gostaria de pedir para os amigos do fórum para melhorar ele, pois para listar os ncm's, demora um pouco, se fosse possível adicionar uma mensagem, (não o showmessage e sim o evento StatusChange) assim como no acbrnfe, pois eu não consegui. no mais o componente esta pronto e funcional, fico aguardando os testes

eu ja tenho o codigo que faz o download dos ncm's, e tambem consulta os ja existentes, eu ja uso ele em meus projetos, vou ficar muito feliz em contribuir com o acbr mais uma vez, assim que tiver pronto eu posto o componente para testes