Buscar

Carregando imagem para um relatório rave

Código

{... Criado por Ricardo de Oliveira Santos ...}
procedure CarregaImagemRave(NomeProjeto: TRvProject;
  NomeRelatorio, NomeImagem, PathImagem: String);
var
  MyPage : TRavePage;
  MyPicture : TRaveBitmap;
begin
  NomeProjeto.Open;
  with NomeProjeto.ProjMan do
  begin
     MyPage := FindRaveComponent(NomeRelatorio,nil) as TRavePage;
     MyPicture := FindRaveComponent(NomeImagem,MyPage) as TRaveBitmap;
     MyPicture.Image.LoadFromFile(PathImagem);
  end;
end;
 

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Impressão
Adicionada dia: 08/07/03
Por: Ricardo De Oliveira Santos
Visualizada: 6311 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009