Kill process ADOBE PDF ?!

[AOKISANTOS]

**************************
function pdfMain(Nomerel)
**************************
local poWnd, oActiveX,IDPDF:=""

IF ! PDFActivex(@IDPDF)
RETURN(.F.)
ENDIF

nomerel:=if(nomerel=nil,"PDF Relatório",nomerel)

DEFINE WINDOW poWnd TITLE ".::"+alltrim(sis_1nom)+"::. "+nomerel+" - "+IDPDF

oActiveX = TActiveX():New( poWnd, IDPDF )

poWnd:oClient = oActiveX // To fill the entire window surface

oActiveX:Do( "LoadFile", "genesis.pdf" )
oActiveX:Do( "SetCurrentPage", 1 )

ACTIVATE WINDOW poWnd MAXIMIZED

return nil



using the function above, when closing my system the process (it MARINATES PDF) it is still active. How do I can finish him/it?


Aoki

[Enrico Maria Giordano]

Did you already try

Code: Select all  Expand view

oActiveX:End()

?

EMG

[AOKISANTOS]

Enrico, not kill using oActivex:end(), help-me !


**************************
function pdfMain(Nomerel)
**************************
local poWnd, oActiveX,IDPDF:=""

IF ! PDFActivex(@IDPDF)
RETURN(.F.)
ENDIF

nomerel:=if(nomerel=nil,"PDF Relatório",nomerel)

DEFINE WINDOW poWnd TITLE ".::"+alltrim(sis_1nom)+"::. "+nomerel+" - "+IDPDF

oActiveX = TActiveX():New( poWnd, IDPDF )

poWnd:oClient = oActiveX // To fill the entire window surface

oActiveX:Do( "LoadFile", "genesis.pdf" )
oActiveX:Do( "SetCurrentPage", 1 )

ACTIVATE WINDOW poWnd MAXIMIZED valid(oActiveX:End(),.t.)

return nil