MSOFT

Os schemas do seu sistema esta atualizado. Deverá ser apenas isto. Aconteceu comigo quando migrei. Dentro da pasta onde vc baixou o trunck2 do acbr procure ...Exemplos\ACBrDFe\Schemas\NFe, dentro desta peque os novos esquemas e coloque dentro da pasta schemas de seus sistema que acho que resolverá. Atenciosamente, Maurício R. Costa

Se alguém tiver este problema vou posta a qui a minha solução. Não é obrigado fazer instalação de nenhum componente. Na cláusula uses coloque pngimage e o código ficou assim: var Stream: TMemoryStream; png: TPngImage; begin Stream:= TMemoryStream.Create; try dmnfe.acbrcnsltcnpj.Captcha(Stream); png:= TPngImage.Create; try png.LoadFromStream(Stream); Image1.Picture.Assign(png); EditCaptcha.Clear; EditCaptcha.SetFocus; finally png.Free; end; finally Stream.Free; end;

Galera! Alguém teve problema ao usar esta unt? Pois, ao usar deu erro na zlb.

Esta acontecendo comigo do mesmo jeito. Quando configuramos para uma porta virtual da impressora dá ok exemplo COM4, menos o espaçamento entre linhas na bemtech mp-4200 não muda mas, quando vc configura para um compartilhamento exemplo \\caixa\imp-mp4200, funciona a largura entre linhas mas quando vc imprime uma impressão exemplo conta para conferência ele imprime lentamente e as vezes perde a impressão ou seja imprime pela mentade. No EscPos ele não imprime em rede. Outra coisa que percebi é o alinhamento a direita que não imprime de jeito nenhum, já tentei de tudo.

Bematech mp-4000 th. Ela imprime todas das tags de formatação como comentei. Negrito, sublinhado, itálico, condensado, alinhado a esquerda, centralizado. Mas, quando a direita não vai.

A tag de alinhamento a direita não esta funcionando no ACBrPosPrinter. Mesmo no demo já teste de várias maneiras e só imprime alinhado a esquerda. No exemplo esta errado a tag de alinhamento a direita pois a mesma esta assim: </fn></ad>ALINHADO A DIREITA Se esta correto não esta funcionando. Ou estou fazendo algo errado! Alguém teve o mesmo problema?

Parabéns RickMao você como sempre colaborando com o pessoal de maneira clara!

Galera pesquisei bastante também pelo fórum e nada. Daí fiz da seguinte maneira mas, mesmo assim percebo que não esta 100%. Cinto que o pessoal fica omitindo esclarecer certos assuntos aqui no fórum. Na verdade omitindo. Não entendo se este é feito para compartilhar conhecimentos. Na verdade acho que utilizam de má fé. Desculpa galera. Acadei desabafando e não postei o código: vChaveNFCE := Copy( dm.ACBrNFe.NotasFiscais.Items[0].NFe.infNFe.ID, 4, 44 ); QryNumNota.ParamByName('idvenda').AsInteger := pIdVenda; QryNumNota.ParamByName('chave_nfce').AsString := vChaveNFCE; QryNumNota.ParamByName('dt_emis_nfce').AsDate := dm.ACBrNFe.NotasFiscais.Items[0].Nfe.Ide.dEmi; QryNumNota.ParamByName('hr_emis_nfce').AsTime := dm.ACBrNFe.NotasFiscais.Items[0].Nfe.Ide.hSaiEnt; QryNumNota.ParamByName('hr_gerou_nfce').AsTime := DM.ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.dhRecbto; QryNumNota.ParamByName('dt_gerou_nfce').AsDate := DM.ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.dhRecbto; //verificar como pegar o retorno QryNumNota.ParamByName('num_recibo').AsString := datetimetostr( dm.ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.dhRecbto ); QryNumNota.ParamByName('num_protocolo').AsString := dm.ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.nProt; //verificar como pegar o retorno QryNumNota.ParamByName('status_nfce').AsString := inttostr( dm.ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.cStat ); QryNumNota.ParamByName('desc_status').AsString := ''; QryNumNota.ParamByName('ambiente_nfce').AsString := TpAmbToStr( dm.ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.tpAmb ); QryNumNota.ParamByName('modelo').AsString := inttostr( dm.ACBrNFe.NotasFiscais.Items[0].Nfe.Ide.modelo ); QryNumNota.ParamByName('serie').AsString := inttostr( dm.ACBrNFe.NotasFiscais.Items[0].Nfe.Ide.serie ); QryNumNota.ParamByName('resposta').AsString := dm.ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.xMotivo; QryNumNota.ParamByName('contingencia').AsString := 'C';//nota confirma e online QryNumNota.ParamByName('num_nfce').asinteger := pNumNota; //salvar o path do xml vPathXml := dm.ACBrNFe.Configuracoes.Arquivos.PathNFe + fCNPJEmp + '\NFCe\' + formatdatetime('yyyymm', now) + '\NFCe\' + vChaveNFCE + '-nfe.xml' ; QryNumNota.ParamByName('path_xml').AsString := vPathXml;//nota off line e não enviada //fim o path no bando de dados QryNumNota.ExecSQL( false ); dm.GravaXmlNFe( pIdVenda, dm.ACBrNFe );//guardar o xml no banco de dados

Galera boa tarde! Após migrar para um trunck2, fui compilar minha aplicação desenvolvida em delphi xe esta dando erro em uma função PosEx que esta na unit acbrdevice. A função dá como não identificada. Mas percebo que esta contem na unit ACBrUtil. Já vi vários tópicos encontrei o do amigo que comentava que retirou a função desta unit e colocou em uma unit que ele criou no seu próprio projeto com funções peculiares. Não o fiz porque acho que compromete os demais componentes acbr. Alguém esta passando ou passou por este problema após migrar para o trunck2?

Galera boa tarde! Após migrar para um trunck2, fui compilar minha aplicação desenvolvida em delphi xe esta dando erro em uma função PosEx que esta na unit acbrdevice. A função dá como não identificada. Mas percebo que esta contem na unit ACBrUtil. Já vi vários tópicos encontrei o do amigo que comentava que retirou a função desta unit e colocou em uma unit que ele criou no seu próprio projeto com funções peculiares. Não o fiz porque acho que compromete os demais componentes acbr. Alguém esta passando ou passou por este problema após migrar para o trunck2?

Mesmo problema comigo noelio. E com os exemplos do acbr não dá erro algum. Minha versão do delphi é o Xe. Gostaria de saber se esta mudança que vc fez na ACBRUtils não compromete outras units do acbr?

Valdecir estava dando o mesmo problema comigo com o delphi xe. Fiz a modificação que você falou e ficou blz! Muito obrigado!