FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Mostrar PDF
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Mostrar PDF
Posted: Mon Mar 03, 2014 01:22 AM

Hola Foreros:

Estoy usando WinExec(Ruta_y_nombre_del_AcrobarReader + " " + Archivo.Pdf) para mostrar el archivo PDF,
si quito la ruta y nombre del AcrobarReader no funciona.

En el disco duro basta con dar un doble clic sobe el archivo.pdf para que se inicie AcrobatReader y muestre el
archivo .PDF.

Alguien conoce una forma de simular el doble clic desde una aplicación con FW???.

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: Mostrar PDF
Posted: Mon Mar 03, 2014 03:04 AM

Hoal sr....
Prueba asi:
cfile := <ruta completa del archivo pdf>

SHELLEXECUTE( 0, 0, cFile, 0, 0, 1 )

Salu2

Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Mostrar PDF
Posted: Mon Mar 03, 2014 04:48 AM

Willi:

Gracias Mr., va de 100.

Después de abrir varios documentos, esporádicamente me tira un GPF, de esos que dice que el
sistema dejó de funcionar y Windows cerrará el programa.

Será que hay que limpiar algún objeto?

Por cierto, donde encuentro la sintaxis de ShellExecute()?

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Re: Mostrar PDF
Posted: Mon Mar 03, 2014 06:59 AM
Hola Armando:

Así es como lo uso y nunca he tenido problemas:


Code (fw): Select all Collapse
ShellExecute( ,"open", cFicheroPDF,,,1 )
Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Mostrar PDF
Posted: Mon Mar 03, 2014 02:45 PM

Manuel:

Muchas gracias, probaré y comentaré los resultados.

Y la sintaxis ?, donde la encuentro?

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: Mostrar PDF
Posted: Mon Mar 03, 2014 06:52 PM
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Mostrar PDF
Posted: Mon Mar 03, 2014 08:17 PM

Willi:

Como siempre; atento.

Muchas gracias

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 880
Joined: Fri Jan 12, 2007 08:35 PM
Re: Mostrar PDF
Posted: Fri Mar 07, 2014 10:22 PM
yo lo uso a si :-)

Code (fw): Select all Collapse
FUNCTION VerPDFF(cFichero)

Local oDlg,oActiveX

DEFINE DIALOG oDlg RESOURCE "DIALOGPDF" TITLE "POLIZA EN FORMATO PDF--->"+" "+ oQry:poliza

oDlg:lHelpIcon:=.F.

REDEFINE ACTIVEX oActiveX ID 800 OF oDlg PROGID "AcroPDF.PDF.1"

ACTIVATE DIALOG oDlg  CENTERED ;
ON INIT (oActiveX:Do( "LoadFile", ALLTRIM(cFichero) ),oActiveX:Do( "SetCurrentPage", 1 )  ) //NOMODAL

RETURN NIL


Saluditos :-)
Que es mejor que programar? creo que nada :)
Atropellada pero aqui ando :P

I love Fivewin

séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ

Continue the discussion