#cs ----------------------------------------------------------------------------

 AutoIt Version : 3.3.6.1
 Auteur:         Moi

 Fonction du Script :
	UDF permettant de creer et de controler des objet PDF

#ce ----------------------------------------------------------------------------

Global $obj
Global $src



#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFCreate
	utilitée = creer un objet qui gère les PDF (remarque : il faut le mettre dans une GUI)
#ce ----------------------------------------------------------------------------
Func _PDFCreate ()
	Local $obj = ObjCreate("acroPDF.PDf")
If Not IsObj($obj) Then
	Return 0
Else
	Return $obj
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFSetFile
	utilitée = définis le fichier exploiter par un objet générer avec _PDFCreate
#ce ----------------------------------------------------------------------------
Func _PDFSetFile ($obj,$src)
If Not IsObj($obj) Then
	Return 0
	Else
$obj.src = $src
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFNext
	utilitée = affiche la page sivante d'un objet PDF
#ce ----------------------------------------------------------------------------
Func _PDFNext ($obj)
	If $obj.src = "" Then
		Return 0
		Else
ObjEvent($obj.gotoNextpage)
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFPrevious
	utilitée = affiche la page précédente d'un objet PDF
#ce ----------------------------------------------------------------------------
Func _PDFPrevious ($obj)
	If $obj.src = "" Then
		Return 0
		Else
ObjEvent($obj.gotoPreviouspage)
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFLast
	utilitée = affiche la dernière page d'un objet PDF
#ce ----------------------------------------------------------------------------
Func _PDFLast ($obj)
	If $obj.src = "" Then
		Return 0
		Else
ObjEvent($obj.gotoLastpage)
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFFirst
	utilitée = affiche la première page d'un objet PDF
#ce ----------------------------------------------------------------------------
Func _PDFFirst ($obj)
	If $obj.src = "" Then
		Return 0
		Else
ObjEvent($obj.gotoFirstpage)
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFPrint
	utiliter = imprime le fichier PDF avec une boîte de dialogue
#ce ----------------------------------------------------------------------------
Func _PDFPrint ($obj)
	If $obj.src = "" Then
		Return 0
		Else
ObjEvent($obj.Print)
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFGetVersions
	utiliter = donne les versions d'un objet PDF
#ce ----------------------------------------------------------------------------
Func _PDFGetVersions ($obj)
	If Not IsObj($obj) Then
		Return 0
		Else
$versions = $obj.GetVersions
Return $versions
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFSetZoom
	utiliter = définie le pourcentage de zoom sur un objet PDF
#ce ----------------------------------------------------------------------------
Func _PDFSetZoom ($obj,$zoom)
	If Not IsObj($obj) Then
		Return 0
		Else
$obj.SetZoom($zoom)
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFSetVisibleToolbar
	utiliter = définie si la barre d'outils d'un objet PDF est visible ou non
#ce ----------------------------------------------------------------------------
Func _PDFSetVisibleToolbar ($obj,$bool)
	If Not IsObj($obj) Then
		Return 0
	Else
		If $bool = True Then
$obj.setShowToolbar(True)
ElseIf $bool = False Then
$obj.setShowToolbar(False)
Else
	return 3
	EndIf
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFSetVisibleScrollBar
	utiliter = définie si la barre d'outils d'un objet PDF est visible ou non
#ce ----------------------------------------------------------------------------
Func _PDFSetVisibleScrollBars ($obj,$bool)
	If Not IsObj($obj) Then
		Return 0
	Else
		If $bool = True Then
$obj.setShowScrollbars(True)
ElseIf $bool = False Then
$obj.setShowScrollbars(False)
Else
	return 3
	EndIf
EndIf
EndFunc
#cs ----------------------------------------------------------------------------
	nom de la fonction = _PDFSetCurrentPage
	utiliter = définie la page actuelle d'un objet PDF
#ce ----------------------------------------------------------------------------
Func _PDFSetCurrentPage ($obj,$page_number)
	If Not IsObj($obj) Then
		Return 0
		Else
$obj.SetCurrentPage($page_number)
EndIf
EndFunc