Discussion :

[Gualino]

Bonjour à tous,

Je voulais afficher un pdf dans un form. J'ai trouvé un la bonne info:
http://visualbasic.about.com/od/quic...qt/disppdf.htm

En fait il existe un objet pdf dédié: AxAcroPDF1

çà fonctione très bien:

Code :

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

1
2
3
4
5
6
7
Private Sub HelpFile(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Help_button.Click
 
        Console.WriteLine(HelpForm.AxAcroPDF1.LoadFile("C:\Users\Laurent\Documents\HelpFile.pdf"))
 
        HelpForm.Show()
 
    End Sub

Mais pour qu'il soit accessible depuis n'importe quel ordinateur je dois le mettre dans le dossier ressource:

Code :

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

HelpForm.AxAcroPDF1.LoadFile(My.Resources.HelpFile.ToString)

Et là je ne trouve pas la syntaxe...

[youtpout978]

je sais pas si tu peux lire un fichier pdf directement depuis les ressources mais tu peux sinon soit le copié avec l'appli et l'ouvrir en indiquant qu'il se trouve dans le répertoire de ton appli, pour connaitre le répertoire de ton application tu as:

Code :

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

1
2
 
 Dim path As String = Directory.GetCurrentDirectory()

http://msdn.microsoft.com/fr-fr/libr...tory.aspx#Y342

ou sinon le mettre dans les ressource incorporé et l'extraire à l'ouverture de l'appli, ce qui est un peu plus compliqué

[Gualino]

Salut youtpout978,

Je regarde la doc mais je ne comprend pas bien....

J’essaie d'appliquer GetCurrentDirectory à HelpFile.pdf mais çà n'a pas l'air d'être correct...

[Gualino]

c'est bon, il fallait que je le met dans le dossier "debug"

Code :

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

1
2
3
4
5
   Dim path As String = Directory.GetCurrentDirectory
 
        Console.WriteLine(HelpForm.AxAcroPDF1.LoadFile(path & "\HelpFile.pdf"))
 
        HelpForm.Show()

[Gualino]

Je déterre cette conversation car il y a un problème.

Si on le place dans le dossier debug, et que l'on debug depuis Visual Studio çà va, mais si on publie un .exe le dossier debug n'existe plus...et donc çà ne fonctionne plus.

[mdevaux62]

Une solution possible en 3 phases :

1) on place le fichier pdf en ressource
2) quand on veut lire le fichier, on le copie dans un endroit quelconque (ici le répertoire de l'appli)
3) puis on lance un process.

Le code maintenant :
(dans l'exemple, la ressource se nomme FichierEnRessource)

Code :

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

1
2
3
4
 
        Dim destination As String = My.Application.Info.DirectoryPath & "\FichierCopie.pdf"
        System.IO.File.WriteAllBytes(destination, My.Resources.FichierEnRessource)
        System.Diagnostics.Process.Start(destination)

Une autre solution :
Inclure le fichier (s'il n'y en a qu'un et s'il s'agit de la doc par exemple) dans le package de distribution.
Simple à faire avec InnoSetup.
Ca évite de se traîner un fichier, pas vraiment utile à l'appli, en ressource.

[Gualino]

Merci mdevaux62,

çà fonctionne impec!