Jump to content
Fórum Script Brasil
  • 0

JPEG no relatório


Samarkland

Question

Estou com um problema quero criar um relatório no delphi onde o cliente possa colocar sua própria imagem JPG (arte feita no Corel por ele mesmo, logotipo) e que não importa a resolução da imagem o relatório reduz ou aumenta automaticamente a imagem para se ajustar no espaço já reservado para a imagem dentro do relatório.

Eu pensei no cliente simplesmente copiar e colar a imagem dele substituindo a minha imagem de exemplo.

A imagem vai ficar em c:\sistemalogo\imagens\img0001.jpg

Como faço isto no quickreport ou no rave report ?

Se alguém tiver uma sugestão melhor para fazer com que a própria imagem JPG do cliente seja usada no relatório eu aceito e agradeço.

Link to comment
Share on other sites

1 answer to this question

Recommended Posts

  • 0

exemplo para o quickreport

// No evento BeforePrint do QRBand, faça a seguinte rotina:

procedure TForm1.QRBand1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean);
var
Imagem: TJPEGImage;
begin

// Imprimindo direto do arquivo JPG
Imagem := TJPEGImage.Create;
Imagem.LoadFromFile('C:\sistemalogo\imagens\img0001.jpg');
QRImage1.Picture.Assign(Imagem);
Imagem.Free;
end;

=================================================================

Para o Rave Reports veja na pagina 30 dessa apostila

http://www.theclub.com.br/Restrito/Revistas/PDFS/2003/0309.pdf

abraço

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152.1k
    • Total Posts
      652k
×
×
  • Create New...