Tengo un codigo de PascalScript en un reporte de FastReport, el cual hace
que se muestre una imagen y funciona perfectamente bien.
El punto es que ahora quiero saber si la imagen existe o no.
Como todos sabemos en Xailer seria así:
if file("Mi_archivo.txt")
Msginfo("El archivo no existe")
Endif
Pero en este lenguaje no tengo ni idea de como hacerlo.
Si alguien sabe como hacerlo, se los agradeceria mucho.
Este es el codigo en FastReport.
procedure Picture1OnBeforePrint(Sender: TfrxComponent);
var
pict: TPicture;
begin
pict:= TPicture.Create;
pict.LoadFromFile('C://Windows//foto.bmp');
TfrxPictureView(Sender).Picture:= pict;
pict.Free;
end;
begin
end.
Dios les bendiga.
__________ Information from ESET NOD32 Antivirus, version of virus signature database 4081 (20090517) __________
The message was checked by ESET NOD32 Antivirus.
http://www.eset.com
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Alguien sabe PascalScript de FastReport ?
-
PEDRO DE LEON RODAS[3]
- Mensajes: 266
- Registrado: Mar Oct 28, 2008 4:41 am