Logo Nfe

[Notecenter Notebook]

Boa Noite

Estou com o seguinte problema.

Carrego a logo no Confignfe, normal, minha imagem é em jpg.

Na geração por pdf é normal(monstra a imagem), no email tb, mas quando gero o processo de criação não aparece.

 

Ex:da Função

 

 

Function TfrmNFe.CarregaConfigNFE(iCODIGO : SmallInt): Boolean;

Begin

  Try

    Result := False;

    With sqlDadosNFe Do

    Begin

      SQLConnection := DBX_Express.SQLConnection;

      Close;

      CommandText := ' SELECT * FROM ConfigNFe WHERE CODPARAM_NFE = ' + IntToStr(iCODIGO);

      Prepared := True;

    End;

    With cdsDadosNFe Do

    Begin

      Close;

      Open;

      If Not(IsEmpty) Then

      Begin

        ACBrNFe1.Configuracoes.Certificados.NumeroSerie := FieldByName('NUMSERIE_NFE').AsString;

 

        ACBrNFe1.Configuracoes.Arquivos.Salvar := (FieldByName('SALVAR_NFE').AsInteger = 1);

        Case FieldByName('FORMAEMISSAO_NFE').AsInteger Of

          0: ACBrNFe1.Configuracoes.Geral.FormaEmissao := teNormal;

          1: ACBrNFe1.Configuracoes.Geral.FormaEmissao := teContingencia;

          2: ACBrNFe1.Configuracoes.Geral.FormaEmissao := teSCAN;

          3: ACBrNFe1.Configuracoes.Geral.FormaEmissao := teDPEC;

          4: ACBrNFe1.Configuracoes.Geral.FormaEmissao := teFSDA;

        Else

          ACBrNFe1.Configuracoes.Geral.FormaEmissao := teNormal;

        End;

        ACBrNFe1.Configuracoes.Geral.PathSalvar := FieldByName('DIR_SALVAR_NFE').AsString;

 

        ACBrNFe1.Configuracoes.WebServices.UF := FieldByName('WS_UF_NFE').AsString;

        ACBrNFe1.Configuracoes.WebServices.Visualizar := (FieldByName('WS_VISUALIZA_NFE').AsInteger = 1);

        Case FieldByName('WS_AMBIENTE_NFE').AsInteger Of

          0: ACBrNFe1.Configuracoes.WebServices.Ambiente := taProducao;

          1: ACBrNFe1.Configuracoes.WebServices.Ambiente := taHomologacao;

        Else

          ACBrNFe1.Configuracoes.WebServices.Ambiente := taProducao;

        End;

        ACBrNFe1.Configuracoes.WebServices.ProxyHost := FieldByName('PROXY_HOST_NFE').AsString;

        ACBrNFe1.Configuracoes.WebServices.ProxyPort := FieldByName('PROXY_PORTA_NFE').AsString;

        ACBrNFe1.Configuracoes.WebServices.ProxyUser := FieldByName('PROXY_USER_NFE').AsString;

        ACBrNFe1.Configuracoes.WebServices.ProxyPass := FieldByName('PROXY_SENHA_NFE').AsString;

 

        Case FieldByName('DANFE_NFE').AsInteger Of

          0: ACBrNFeDANFERave1.TipoDANFE := tiRetrato;

          1: ACBrNFeDANFERave1.TipoDANFE := tiPaisagem;

        Else

          ACBrNFeDANFERave1.TipoDANFE := tiRetrato;

        End;

        ACBrNFeDANFERave1.NumCopias := FieldByName('NUMCOPIAS_NFE').AsInteger;

        ACBrNFeDANFERave1.Logo := FieldByName('DIR_LOGO_NFE').AsString;

      //  ShowMessage(FieldByName('DIR_LOGO_NFE').AsString);

 

        ACBrNFe1.Configuracoes.Arquivos.PathCan  := FieldByName('DIR_CANC_NFE').AsString;

        ACBrNFe1.Configuracoes.Arquivos.PathDPEC := FieldByName('DIR_DPEC_NFE').AsString;

        ACBrNFe1.Configuracoes.Arquivos.PathInu  := FieldByName('DIR_INU_NFE').AsString;

        ACBrNFe1.Configuracoes.Arquivos.PathNFe  := FieldByName('DIR_NFES_NFE').AsString;

        ACBrNFe1.Configuracoes.Geral.PathSchemas := FieldByName('DIR_SCHEMA_NFE').AsString;

        ACBrNFeDANFERave1.PathPDF := FieldByName('DIR_PDF_NFE').AsString;

        //ACBrNFeDANFERave1. := FieldByName('DIR_RAVE_NFE').AsString + '\NotaFiscalEletronica.rav';

 

        Result := True;

      End;

    End;

  Except

    MessageBox(0, 'Falha na abertura dos dados de NF-e. Favor entrar em contato com o Suporte.', 'Atenção', MB_ICONWARNING or MB_OK or MB_SETFOREGROUND or MB_TOPMOST);

    Result := False;

    grbTela.Enabled := False;

  End;

End;

 

[André Ferreira de Moraes]

O danfe rave usa imagem em bmp, apenas o rave cb q usa jpg

[Notecenter Notebook]

Eu uso o RaveCB se eu tento colocar bmp da erro

[André Ferreira de Moraes]

O que vc quis dizer com "mas quando gero o processo de criação não aparece"?

Anexe o logo que vc está usando.

[Notecenter Notebook]

Então, usando de Base o Demo. Quando eu gero o pdf ou envio por email saiu a logo.

 

 

[André Ferreira de Moraes]

Vc diz que no PDF e no Email o logo aparece, apenas qdo manda imprimir que não aparece?

Qual versão do Rave que vc tem instalado? Testou em outro micro?

[Notecenter Notebook]

utilizo o Rave 5.0.

Então nenhum cliente nosso gera ela com logo.

Só mesmo no email e no pdf.

[André Ferreira de Moraes]

Não estou entendo seu problema, vc quer que apareça o logo ou não?

[Notecenter Notebook]

Quero que aparece sim.

Só que existe uma diferente na função ImprimirPDF (sai o logo) e Função Imprimir (Não Sai o Logo).

[André Ferreira de Moraes]

Qual a versão exata do seu Rave? Pois o RaveCB não funciona corretamente na versão que vem instalada por padrão no delphi.

[Notecenter Notebook]

André no componente aponta 5.0.04 (VCL7)

[André Ferreira de Moraes]

O recomendado para usar a versão RaveCB é a versão "Rave be 5.0.8", vc encontra a atualização na página da embarcadero.