Incluir imagen en informe

[Alfonso]

Hola a todos:

Sigo haciendo pruebas con FastReport y avanzado en su uso.

Ahora me surge una duda, quiero incluir un logo en un informe, para ello uso el objeto TPicture de FastReport. Ahi me permite recoger una imagen que tengo en el disco duro y la guarda en el informe, hasta ahi todo correcto y funciona.

La pregunta es: ¿puedo cargar una imagen en tiempo de ejecucion, es decir que FastReport busque la imagen en la ruta que yo le indique?

Seria una cosa asi:

procedure CabeceraOnBeforePrint(Sender: TfrxComponent);
Picture1:Picture:= '\Mi ruta\Logo.bmp'
end

Por supuesto esta instruccion no funciona, no se si existe alguna propiedad del objeto TPicture que pueda usar, o bien otro objeto que sirva para lo que necesito.

Espero que se entienda.

Gracias de antemano por la ayuda.

[hgarciaj]

Hola a todos:

Sigo haciendo pruebas con FastReport y avanzado en su uso.

Ahora me surge una duda, quiero incluir un logo en un informe, para ello uso el objeto TPicture de FastReport. Ahi me permite recoger una imagen que tengo en el disco duro y la guarda en el informe, hasta ahi todo correcto y funciona.

La pregunta es: ¿puedo cargar una imagen en tiempo de ejecucion, es decir que FastReport busque la imagen en la ruta que yo le indique?

La respuesta es si

Seria una cosa asi:

procedure CabeceraOnBeforePrint(Sender: TfrxComponent);
Picture1:Picture:= '\Mi ruta\Logo.bmp'
end

Por supuesto esta instruccion no funciona, no se si existe alguna propiedad del objeto TPicture que pueda usar, o bien otro objeto que sirva para lo que necesito.

Espero que se entienda.

Se entiende

Crea en tu programa en Xailer una AppData, digamos Application:addData("cimagen","c:\mis imagenes\image.png")
Eso hará que en le diseñador aparezca esta appdata en el apartado de variables en la sección de Xailer
Luego en la ceja eventos del diseñador habilitas el evento onBeforePrint y te crea el código que podrás modificar en la ceja código del diseñador, ahí insertas la siguiente linea

picture1.filelink:=<AppData:cimagen>;
entre el begin y el end para que se vea así:
procedure ReportOnStartReport(Sender: TfrxComponent);
begin
picture.filelink:=<AppData:cimagen>;
end;

Con eso tomará el archivo que le envíes desde tu programa

Gracias de antemano por la ayuda.

[ddupre]

Hola Alfonso.

Prueba utilizar :

Picture1:FileLink:= '\Mi ruta\Logo.bmp'

Saludos
Daniel

[Alfonso]

Solucionado, funciona perfectamente.

Muchas gracias por vuestra ayuda.