topic-27720

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Activex con Adobe Reader
Posted: Mon Nov 25, 2013 06:34 PM

Personas, esto funciona perfecto, mas estoy con una duda:

El preview del Adobe Reader, con este ejemplo, muetra los botones del Adobe, Como hago, para muestrar el MENU PRINCIPAL del ADOBE READER, para que el Usuário pueda ver la Opción <Salir> del menu? Óu el Botón <Salir>?

Code (fw): Select all Collapse

FUNCTION ShowPDF_READER( cAlias ) // usando o ADOBE READER - 25/11/2013

   LOCAL oWndPdf, oPdf, cTmp

   DEFINE WINDOW oWndPdf TITLE "FiveWin ActiveX Support - Visualizar/Imprimir o *.PDF Usando o Adobe Reader"

   oPdf := TActiveX():New( oWndPdf, "AcroPDF.PDF.1" )

   oWndPdf:oClient := oPdf

   oPdf : src = CurDrive() + ":\" + CurDir() + "\fwintro.pdf"

   // Mostra Preview Pequeno no lado esquedo da tela...
   // oPdf:Do( "SetPageMode", "thumbnail and pages" )

   oPdf:SetProp( "Src", cTmp )

   oPdf:Do( "LoadFile", Lfn2Sfn(cTmp) )

   oPdf:Do( "GetVersions" )

   oPdf:Do( "SetCurrentPage", 1 )

   // oPdf:Print() // Nao funciona direto na impressora..

   // Mostra a Barra de Botoes do ADOBE READER
   oPdf:Do( "SetShowToolbar", .T. )

   ACTIVATE WINDOW oWndPdf MAXIMIZED

RETURN NIL

Gracias, salu2.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

FiveTech Support Forums

Continue the discussion