Tecnologia > Ferramentas de Apoio > LSP - Linguagem Senior de Programação > Funções > Específicas do Gerador de Relatórios > CarregaImagemControle

CarregaImagemControle

Esta função somente aceita imagens do tipo .BMP ou .JPG. Carrega uma imagem qualquer a partir de um endereço, gravado no banco ou não ou ainda a partir de uma imagem gravada no banco.

Sintaxe: CarregaImagemControle (Alfa NomeDoControle, Numero ArquivoOuBanco, Alfa CaminhoOuCampo, Alfa SQL);

Parâmetros:

Nome Tipo Descrição
NomeDoControle Alfa Variável que recebe o nome do controle do modelo ao qual se quer carregar a imagem.
ArquivoOuBanco Numero Variável que recebe 0 para carregar a imagem a partir de arquivo ou 1 para carregar do banco de dados.
CaminhoOuCampo Alfa Variável que recebe o Caminho do arquivo(Imagem de Arquivo), ou a TABELA.CAMPO (Imagem do Banco).
SQL Alfa Variável que recebe a condição que será inserida na clausula WHERE de busca da imagem no banco. (Somente usado se ArquivoOuBanco = 1).

Exemplos:

  1. Carregando a partir de um endereço:
    • CarregaImagemControle ("Imagem001", 0, "c:\\ICO.ICO", "");
    • CarregaImagemControle ("Imagem002", 0, "\\\\Micro01\\temp\\JPG.JPG", "");
  2. Carregando do banco:
    • CarregaImagemControle ("Imagem001", 1, "R034FOT.FotEmp", "NUMCAD = 321");
  3. Carregando do banco (o endereço ou a imagem):
Definir Alfa VEndFot;
			
/*Endereço da imagem que está gravado no banco*/
			
VEndFot = E075FOT.EndFot;
			
/*Verifica se tem endereço informado, caso não tenha, */
			
/* é porque a própria imagem está gravada no banco*/
			
EstaNulo(VEndFot,VRet);
			
Se (VRet = 0) /*Não está nulo, ou seja, Possui endereço gravado no banco*/
			
/*Se estiver gravado apenas o caminho da imagem no banco*/ 
			
CarregaImagemControle("Imagem001",0,VEndFot,"");
			
Senao
			
/*Se a imagem estiver gravada no banco*/ 
			
CarregaImagemControle("Imagem001",1,"E075FOT.ImgFot","");
			

Utilização da Função (dependentes): Nenhum dependente.

Observações: Nas regras, para digitar uma "\" deve-se digitar "\\". Quando utilizada a função CarregaImagemControle e, em seguida, o relatório for salvo em PDF com um tamanho excessivo do arquivo, acesse a página Geração de Arquivos PDF e PDF/A e consulte as sugestões de melhorias do tamanho do arquivo.

Este artigo ajudou você?