Ir para conteúdo
  • Cadastre-se

dev botao

Dificuldades para colocar logomarca no DANFE NFe


Ver Solução Respondido por BigWings,
  • Este tópico foi criado há 1028 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro
Postado (editado)

Boa tarde,

Estou encontrando dificuldades nesta parte do código. Utilizo Lazarus, 2.0.6, fpc 3.0.4

  if ACBrNFe1.DANFE <> nil then
  begin
    ACBrNFe1.DANFE.TipoDANFE := StrToTpImp(OK, lblTpDanfe.caption);
    if FileExists(edtLogoMarca.Text) then
    begin
      SS:= TStringStream.Create('');
      try
        SS.LoadFromFile(edtLogoMarca.Text);       <<<< -  Aqui ocorre o erro
        SS.Position := 0;
        ACBrNFe1.DANFE.Logo:= SS.ReadString(SS.Size);
      finally
        SS.Free;
      end;
    end
    else
      ACBrNFe1.DANFE.Logo:= edtLogoMarca.Text;

Ocorre o seguinte erro:

fMain.pas(2040,12) Error: identifier idents no member "LoadFromFile"
Obs.: Retirei essa parte do código do programa exemplo ACBr. 

Editado por Eduardo Scapella
  • Administradores
Postado

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • Este tópico foi criado há 1028 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.