Discussion :

[Mat_76]

Bonjour,

Pour mon logiciel, j'avais besoin d'imprimer un document au format PDF.

En fouillant, j'ai trouvé le code que voici :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
    ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
 
Public Sub imprimer_fichier(Chemin As String, le_form As Form)
    'imprimer le fichier dont le chemin est passé en paramètre
    ShellExecute le_form.hwnd, "print", Chemin, "", "", 1
End Sub

L'impression marche parfaitement, mais Acrobat Reader ce lance en même temps, ce qui est assez génant.

Existe-t-il un moyen d'empécher Acrobat de se lancer automatiquement, ou bien avez-vous une meilleur méthode à me proposer ?

Merci d'avance.

[zazaraignée]

Ouvre le APIViewer pour copier la déclaration des constantes nécessaires. Trouve l'une de celles-ci.

SW_HIDE Hides the window and activates another window.
SW_MAXIMIZE Maximizes the specified window.
SW_MINIMIZE Minimizes the specified window and activates the next top-level window in the z-order.
SW_RESTORE Activates and displays the window. If the window is minimized or maximized, Windows restores it to its original size and position. An application should specify this flag when restoring a minimized window.
SW_SHOW Activates the window and displays it in its current size and position.
SW_SHOWDEFAULT Sets the show state based on the SW_ flag specified in theSTARTUPINFO structure passed to theCreateProcess function by the program that started the application. An application should callShowWindow with this flag to set the initial show state of its main window.
SW_SHOWMAXIMIZED Activates the window and displays it as a maximized window.
SW_SHOWMINIMIZED Activates the window and displays it as a minimized window.
SW_SHOWMINNOACTIVE Displays the window as a minimized window. The active window remains active.
SW_SHOWNA Displays the window in its current state. The active window remains active.
SW_SHOWNOACTIVATE Displays a window in its most recent size and position. The active window remains active.
SW_SHOWNORMAL Activates and displays a window. If the window is minimized or maximized, Windows restores it to its original size and position. An application should specify this flag when displaying the window for the first time.

J'ai comme l'impression que SW_HIDE fera l'affaire.

Edit : J'ai oublié de mentionner que la constante que tu utilisera servira à remplacer le 1 que tu as mis comme valeur du dernier paramètre.

[La crevette]

J'ai le même problème que MAT 76.
J'ai essayé de remplacé le 1 à la fin par SW_HIDE mais la fenêtre d'adobe s'ouvre toujours.
Voilà mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
    ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Sur action d'un bouton :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If Optfrp Then
ShellExecute Me.hwnd, "print", CheminF, "", "", 1
ShellExecute Me.hwnd, "print", CheminMTF, "", "", 1
Else
End If

Merci de votre aide

[SfJ5Rpw8]

J'ai le même problème que MAT 76.
J'ai essayé de remplacé le 1 à la fin par SW_HIDE mais la fenêtre d'adobe s'ouvre toujours.....

as tu comme la dit ZaZa récupéré la déclaration de ta constante SW_HIDE..?
je ne vois pas cette déclaration dans ton code ..!


sinon avec SW_HIDE en paramètre acrobat et lancé mais minimisé (fenêtre non active..).

[La crevette]

J'ai fait un essai en remplaçant le 1 par SW_HIDE. Mais cela n'a pas marché. Au fait qu'est ce qu etu entends par "récupérer la déclaration de ta constante SW_HIDE"
Comment faire ????? Pour moi débutant c'est pas clair. J'ai décalré des API en début de module de ma form

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

mais la constante comment je fais ?

[ProgElecT]

as tu comme la dit ZaZa récupéré la déclaration de ta constante SW_HIDE..?

Dans tes déclaration il faut que tu ais cette ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Const SW_HIDE  = 0

[SfJ5Rpw8]

pour déclarer tes constantes voir APIViewer... ( pages outils du site..)

à placer tout en haut de ton code...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Const SW_HIDE = 0
Private Const SW_SHOWNORMAL = 1
...