Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   Fastreport e imagen (https://www.clubdelphi.com/foros/showthread.php?t=59647)

Besto 03-09-2008 13:41:58

Fastreport e imagen
 
Hola,

en realidad esto no es una consulta, es un problema que tenia yo y estuve buscando por los foros y no encontré nada.
Como buscando por Internet lo encontré al final pongo la solución por si a alguien le viene bien.

El problema me surgio para añadir una imagen a un reporte en tiempo de ejecución usando Fastreport.

Ahi va la solución:

Código Delphi [-]
var
   Pict: TfrPictureView;
begin
   pict := TfrPictureView(frReport1.FindObject('MyImage'));
   if Assigned(pict) then
     Pict.Picture.LoadFromFile('c:\imagem.jpg');
   frReport1.ShowReport; 
   FreeAndNil(pict);
end;

Espero que le sirva a alguien.

Draker 10-01-2011 22:54:53

Jojojo, gracias bro, respondo con un agradecimiento porque es un aliciente para que los que nos gusta compartir soluciones aunque aparentemente parezcan muy pequeñas, pero que en realidad son grandes para poder continuar con nuestros proyectos.

Y una opcion tambien al buscar el objeto:

Código Delphi [-]
Pict:= frReport1.FindObject('MyImage') as TfrxPictureView;


La franja horaria es GMT +2. Ahora son las 05:50:24.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi