Atribuir Logo banco campo stream OnObterLogo

[Diego Limeira da Silva]

Boa noite, precisa pegar logo do banco e jogar na logo em vez de usar o diretorio... tem um exemplo ? OnObterLogo to tentando usar mais nao estou entendo como funcionar..

[wellder]

var
vLogo: TStringStream;
begin
  vLogo := TStringStream.Create(EmptyStr);
            try
              // Carregar logotipo do banco de dados
              TBlobField(Query.FieldByName('compofoto')).SaveToStream(vLogo);
              dm.ACBrNFeDANFCEFR.Logo := vLogo.DataString;
            finally
              FreeAndNil(vLogo);
            end;
end;

Editado 12 Janeiro, 2019 por wellder

[Diego Limeira da Silva]

Boa tarde, funciona no DANFE mas na no boleto nao tem a logo só tem ArquivoLogo e é  read-only property

[Juliana Tamizou]

Bom dia,

Por qual motivo você quer trocar o logo?

Att.

[Diego Limeira da Silva]

bom dia o sistema que estou ajudando desenvolver a logo do banco esta gravada no banco de dados.. a startup solicitou que puxasse do banco

eu vi esse OnObterLogo  que é usado passando um tpicture.. mas nao consegui usar .. esta funcional?

 

[Juliana Tamizou]

Boa tarde.

Tente utilizar o método CarregaLogo()

Att.