Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   No se puede visualizar PDF (https://www.clubdelphi.com/foros/showthread.php?t=62336)

NestorN 17-12-2008 18:59:02

No se puede visualizar PDF
 
Hola Compañeros; quiero poder ejecutar un archivo del tipo pdf por medio de un botón.
Agregue a las uses del form las ShellApi, y utilice el siguiente código en un botón:

Código Delphi [-]
ShellExecute(form1.Handle, 'open',Pchar(Getcurrentdir + '\ReadMe.pdf'),nil,nil,SW_SHOWNORMAL);

El tema es que compila correcatamente, pero al presionar el botón no se ejecuta el pdf. Si alguien me puede dar una mano, desde ya muchas gracias.

Caral 17-12-2008 20:29:29

Hola
A mi me funciona perfectamente.
Pusiste el archivo pdf en el mismo directorio que el programa?.
Eso dice aqui: (Getcurrentdir).
Saludos

Faust 17-12-2008 21:04:40

Generalmente no uso GetCurrentDir, pues no sé como funcione...

Me parece más seguro usar p. ej.

Código Delphi [-]
ShellExecute(form1.Handle, 'open',Pchar(ExtractFileDir(Application.ExeName) + '\ReadMe.pdf'),nil,nil,SW_SHOWNORMAL);

Por si se encuentra en el mismo directorio que tu ejecutable.

Saludos

NestorN 17-12-2008 21:30:57

Gracias por la ayuda, definitivamente lo que me faltaba era poner el pdf dentro de la carpeta del proyecto. Gracias por la ayuda.

Lepe 18-12-2008 11:24:16

Faust lleva razón, GetcurrentDir te da el directorio activo del sistema operativo, pero puede ser distinto al de tu aplicación, es mejor usar ExtractFileDir. O realizar una llamada a SetCurrentDir previamente.... aunque otra aplicación puede hacer lo mismo y tu pdf salir en otra carpeta...

Saludos


La franja horaria es GMT +2. Ahora son las 07:14:00.

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