Example - AutoIt - Debenu PDF Viewer SDK

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic


   AutoIt Example for Debenu PDF Viewer SDK:{this is very similar to VisualBasic so I think it is useful}

#Region QuickPDF Include
#include <MsgBoxConstants.au3>
#include <FileConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <String.au3>
#include <File.au3>
#include <WinAPIFiles.au3>
#EndRegion QuickPDF Include

Example(FileOpenDialog('Select PDF File','c:\','PDF File (*.pdf)'))

Func Example($sPDF_FileFullPath)

	; Create ActivX object
	Local $oQPV = ObjCreate('DPVACTIVEX.Viewer')
	$oQPV.LibraryPath = @ScriptDir & '\DebenuPDFLibraryDLL1014.dll'
	$oQPV.RendererPath = @ScriptDir & '\DebenuPDFRendererDLL1014.dll'
	$oQPV.LicenseKey = 'ENTER YOUR KEY HERE'
	$oQPV.ScrollbarsEnabled = True
	$oQPV.ToolbarEnabled = True
	$oQPV.OpenFile($sPDF_FileFullPath)
	$oQPV.SetZoom(1)
	$oQPV.GotoPage(1)

	; Create a simple GUI for our output
	GUICreate("Embedded Web control Test", 800, 600, (@DesktopWidth - 800) / 2, (@DesktopHeight - 600) / 2, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN))
	GUICtrlCreateObj($oQPV, 10, 10, 780, 500)
	$oQPV.ZoomFitPage()
	Local $idButton_Back = GUICtrlCreateButton("Back", 10, 520, 100, 30)
	Local $idButton_Forward = GUICtrlCreateButton("Forward", 120, 520, 100, 30)
	Local $idButton_Home = GUICtrlCreateButton("Home", 230, 520, 100, 30)

	GUISetState(@SW_SHOW) ;Show GUI

	; Loop until the user exits.
	Local $iMsg
	While 1
		$iMsg = GUIGetMsg()

		Select
			Case $iMsg = $GUI_EVENT_CLOSE
				ExitLoop
			Case $iMsg = $idButton_Back
				$oQPV.PrevPage()
			Case $iMsg = $idButton_Forward
				$oQPV.NextPage()
			Case $iMsg = $idButton_Home
				$oQPV.GotoPage(1)

		EndSelect

	WEnd
	$oQPV = '' ; CleanUp

	GUIDelete()
EndFunc   ;==>Example

Cheers
mLipok


Edited by mLipok - 15 Sep 14 at 9:28AM

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
mLipok Members Profile Find Members Posts Senior Member Joined: 23 Apr 14 Location: Poland, Zabrze Status: Offline Points: 453	Post Options Post Reply Quote mLipok Report Post Thanks(0) Quote Reply Topic: Example - AutoIt - Debenu PDF Viewer SDK Posted: 05 Jun 14 at 12:38PM
	AutoIt Example for Debenu PDF Viewer SDK: {this is very similar to VisualBasic so I think it is useful} #Region QuickPDF Include #include <MsgBoxConstants.au3> #include <FileConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <String.au3> #include <File.au3> #include <WinAPIFiles.au3> #EndRegion QuickPDF Include Example(FileOpenDialog('Select PDF File','c:\','PDF File (*.pdf)')) Func Example($sPDF_FileFullPath) ; Create ActivX object Local $oQPV = ObjCreate('DPVACTIVEX.Viewer') $oQPV.LibraryPath = @ScriptDir & '\DebenuPDFLibraryDLL1014.dll' $oQPV.RendererPath = @ScriptDir & '\DebenuPDFRendererDLL1014.dll' $oQPV.LicenseKey = 'ENTER YOUR KEY HERE' $oQPV.ScrollbarsEnabled = True $oQPV.ToolbarEnabled = True $oQPV.OpenFile($sPDF_FileFullPath) $oQPV.SetZoom(1) $oQPV.GotoPage(1) ; Create a simple GUI for our output GUICreate("Embedded Web control Test", 800, 600, (@DesktopWidth - 800) / 2, (@DesktopHeight - 600) / 2, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN)) GUICtrlCreateObj($oQPV, 10, 10, 780, 500) $oQPV.ZoomFitPage() Local $idButton_Back = GUICtrlCreateButton("Back", 10, 520, 100, 30) Local $idButton_Forward = GUICtrlCreateButton("Forward", 120, 520, 100, 30) Local $idButton_Home = GUICtrlCreateButton("Home", 230, 520, 100, 30) GUISetState(@SW_SHOW) ;Show GUI ; Loop until the user exits. Local $iMsg While 1 $iMsg = GUIGetMsg() Select Case $iMsg = $GUI_EVENT_CLOSE ExitLoop Case $iMsg = $idButton_Back $oQPV.PrevPage() Case $iMsg = $idButton_Forward $oQPV.NextPage() Case $iMsg = $idButton_Home $oQPV.GotoPage(1) EndSelect WEnd $oQPV = '' ; CleanUp GUIDelete() EndFunc ;==>Example Cheers mLipok Edited by mLipok - 15 Sep 14 at 9:28AM
	Here you can find description how to test my examples: http://www.quickpdf.org/forum/forum_posts.asp?TID=2932&PID=12600&title=drawcapturedpagematrix-matrix-howto#12600