Ir para conteúdo
  • Cadastre-se
Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

Mark1

Membros
 Perfil  Explorar Conteúdo

  • Total de ítens

    31

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Posts postados por Mark1

    Imagem no corpo do email (não como anexo)

    em ACBrTCP

    Postado

    Me desculpe, mas se o código for esse, ele se comporta exatamente como descrevi. Ao passar o mouse sobre a imagem e clicar abre-se uma outra janela. 

    if cbUsarHTML.Checked and cbAddImgHTML.Checked then
  begin
    // Depende de: "<img src='cid:LogoACBr'>" em ACBrMail1.Body;
    if Pos('cid:LogoACBr', ACBrMail1.Body.Text) > 0 then
      ACBrMail1.AddAttachment(Dir + 'acbr_logo2.png', 'LogoACBr');
  end;

  if cbAddImgAtt.Checked then
    ACBrMail1.AddAttachment(Dir + 'acbr_logo.jpg');

    Muito obrigado

    Imagem no corpo do email (não como anexo)

    em ACBrTCP

    Postado

    Boa noite pessoal.

    Estou testando o ACBrMail e tenho a seguinte situação:

    Gostaria de inserir (colar) uma imagem no corpo do email, não como anexo, pois ao receber o email e passar o mouse sobre a imagem o cursor muda para HANDPOINT e se clicada abre outra janela. Então seria possível inserir a imagem como se fosse apenas "colada" no corpo do email ?

     

    Grato,

     

    Marcos

    AcbrDownload não funciona?

    em ACBrTCP

    Postado

    Boa noite pessoal.

    Estou tentando utilizar o exemplo doe AcbrDownload mas não funciona corretamente. Ao clicar no botão Download, o contador de bytes baixados vai incrementando, porém o contador de bytes a baixar fica zerado. Os botões Pause e Stop não funcionam. Após um longo período ocorre erro de exceção. Na pasta onde deveria gravar o arquivo baixado aparece o arquivo.zip e também arquivo.zip.part, ambos zerados.

    Vi muitas dúvidas aqui no forum, alguns diziam que o componente não funcionava e depois funcionou. Peguei um exemplo daqui mesmo, mas também sem sucesso.

    E minha dúvida vai mais além, testei o componente Indy, mas também não funcionou. Então não sei se tem a ver com minha máquina (Win7 32) ou o Delphi (XE7), simplesmente não sei.

    Se alguém ainda tiver alguma ideia pra me ajudar... (ou até mesmo indicar outro componente free)

     

    Grato,

     

    Marcos

     

     

     

    SAT com problema de formatação XML

    em ACBrSAT

    Postado

    Blz;

    Por esse passou agora está ocorrendo:

    C:\Componentes\ACBr\Fontes\ACBrDFe\ACBrNFe\DANFE\NFCe\Fortes\ACBrDANFCeFortesFr.pas(1371) Error: E2003 Undeclared identifier: 'UnlimitedHeight'
    ACBr_NFeDanfeRL.dpk(89) Fatal: F2063 Could not compile used unit 'ACBrDANFCeFortesFr.pas'
    Compilation failure
    Erro ao compilar o pacote "ACBr_NFeDanfeRL.dpk".
     

    SAT com problema de formatação XML

    em ACBrSAT

    Postado

    Está ocorrendo o seguinte erro:

    Embarcadero Delphi for Win32 compiler version 28.0
    Copyright (c) 1983,2014 Embarcadero Technologies, Inc.
    C:\Componentes\ACBr\Fontes\ACBrDFe\ACBrDFe.pas(45) Fatal: E2225 Never-build package 'ACBr_Integrador' must be recompiled
    Compilation failure
    Erro ao compilar o pacote "ACBr_DFeComum.dpk".
    Abortando... Ocorreram erros na compilação dos pacotes.

    SATTESTE não imprime os itens na Bematech

    em ACBrSAT

    Postado

    Boa noite.

    Estou realizando testes de impressão com o SATTESTE. Com o Fortes a impressão sai correta, mas quando seleciono EscPos sai somente o cabeçalho (imagem).

    Tenho q realizar alguma alteração na procedure abaixo ou em algum lugar neste projeto ou mesmo nas configurações da impressora (MP-4200 TH) ? 

    procedure TForm1.PrepararImpressao;
begin
  if ACBrSAT1.Extrato = ACBrSATExtratoESCPOS1 then
  begin
    ACBrPosPrinter1.Desativar;
    ACBrPosPrinter1.Modelo := TACBrPosPrinterModelo( cbxModeloPosPrinter.ItemIndex );
    ACBrPosPrinter1.PaginaDeCodigo := TACBrPosPaginaCodigo( cbxPagCodigo.ItemIndex );
    ACBrPosPrinter1.Porta := cbxPorta.Text;
    ACBrPosPrinter1.ColunasFonteNormal := seColunas.Value;
    ACBrPosPrinter1.LinhasEntreCupons := seLinhasPular.Value;
    ACBrPosPrinter1.EspacoEntreLinhas := seEspLinhas.Value;

    ACBrSATExtratoESCPOS1.ImprimeQRCode := True;
    ACBrSATExtratoESCPOS1.ImprimeEmUmaLinha := cbImprimir1Linha.Checked;
  end
  else
  begin
    ACBrSATExtratoFortes1.LarguraBobina    := seLargura.Value;
    ACBrSATExtratoFortes1.Margens.Topo     := seMargemTopo.Value ;
    ACBrSATExtratoFortes1.Margens.Fundo    := seMargemFundo.Value ;
    ACBrSATExtratoFortes1.Margens.Esquerda := seMargemEsquerda.Value ;
    ACBrSATExtratoFortes1.Margens.Direita  := seMargemDireita.Value ;
    ACBrSATExtratoFortes1.MostrarPreview   := cbPreview.Checked;

    try
      if lImpressora.Caption <> '' then
        ACBrSATExtratoFortes1.PrinterName := lImpressora.Caption;
    except
    end;
  end;
end;

    Grato,

     

    Marcos

     

     

     

     

    Extrato-SAT.jpg

    Mensagem de Erro no ACBr SAT / Emulador SEFAZ SP

    em ACBrSAT

    Postado

    4 minutos atrás, André Ferreira de Moraes disse:

    Provavelmente a largura e as margens não estão configuradas corretamente.

    Poxa André era isso mesmo.

    Na verdade não sabia quais eram as medidas. Antes de você me responder achei um tópico aqui mesmo e peguei as medias informadas lá: 

    configure o componente exemplo de uma impressora 48 colunas==>

 ACBrSATExtratoFortes1.LarguraBobina       := 286;
 ACBrSATExtratoFortes1.Margens.Topo        := 0;
 ACBrSATExtratoFortes1.Margens.Fundo      := 0;
 ACBrSATExtratoFortes1.Margens.Esquerda := 5;
 ACBrSATExtratoFortes1.Margens.Direita      := 1;

    Muito obrigado pela ajuda.

    abc

    Mensagem de Erro no ACBr SAT / Emulador SEFAZ SP

    em ACBrSAT

    Postado

    Boa tarde pessoal.

    Já consegui resolver.

    Após várias tentativas, inclusive com a ajuda do nosso amigo Sérgio Assunção, a quem quero agradecer imensamente pela atenção, baixei uma versão anterior a que havia instalado e... funcionou perfeitamente.

    O projeto ACBrSAT também funcionou. Está gerando e enviando a venda.

    Só falta resolver um probleminha. A impressão não sai. Aparece a tela de preview mas o cupom está em branco. Via texto gera normalmente.

    Por acaso tem algum parâmetro no componente ACBrSATExtratoFortes que preciso verificar? Ou talvez algum outro parâmetro no projeto?

    É isso.

    Sérgio, mais uma vez, muito obrigado meu amigo.

    Abraço a todos,

    Marcos

     

     

     

     

     

    • Curtir 1

    Mensagem de Erro no ACBr SAT / Emulador SEFAZ SP

    em ACBrSAT

    Postado

    3 minutos atrás, Sérgio Assunção disse:

    F. “Código de Ativação inválido.” no Aplicativo Comercial Certifique-se de que nas configurações do Aplicativo a senha digitada confere com a senha informada no aplicativo “Ativação SATCFe”.
     

    https://portal.fazenda.sp.gov.br/servicos/sat/Downloads/Manual_do_Emulador_SAT-CF-e_Offline_2015_09_10.pdf

    Mesmos erros. 

    No aplicativo ACBrSAT o código de ativação é 123456. No aplicativo Comandos de Ativação SAT CFe alterei o código para 123456. Ao tentar ativar ocorre:

    NumeroSessao: 527759 - Comando: AtivarSAT( 1, 11111111111111, 35 )
    NumeroSessao: 527759 - Resposta:527759|04003|SAT-CF-e já ativado||

    e ao tentar Associar Assinatura ocorre

    NumeroSessao: 808277 - Comando: AssociarAssinatura( 1111111111111111111111111111, 9d4c4eef8c515e2c1269c2e4fff0719d526c5096422bf1defa20df50ba06469a28adb25ba0447befbced7c0f805a5cc58496b7b23497af9a04f69c77f17c0ce68161f8e4ca7e3a94c827b6c563ca6f47aea05fa90a8ce3e4327853bb2d664ba226728fff1e2c6275ecc9b20129e1c1d2671a837aa1d265b36809501b519dbc08129e1c1d2671a837aa1d265b36809501b519dbc08129e1c1d2671a837aa1d265b36809501b519dbc08129e1c )
    NumeroSessao: 808277 - Resposta:808277|13001|Código de ativação inválido.||

×
×
  • 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.