Mauvaise fermeture a cause du .chm

Signaler
Messages postés
107
Date d'inscription
mardi 20 août 2002
Statut
Membre
Dernière intervention
15 octobre 2004
-
Messages postés
71
Date d'inscription
mardi 29 janvier 2002
Statut
Membre
Dernière intervention
6 janvier 2011
-
Je lance un fichier d'aide (aide.chm) depuis mon progr, masi quand je fait tourné le progr, que je lance l'aide, et que ensuite je ferme tout, je m'apercoi que le progr est encore charger (en faisant Ctrl+Alt+Suppr ou en voulant supr le .exe)

Voici le code utiliser :

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd&, ByVal lpOperation$, ByVal lpFile$, ByVal lpParameters$, ByVal lpDirectory$, ByVal nShowCmd&) As Long

Private Sub mnuAide_Click()
If Dir(App.Path & "\aide.chm") <> "" Then
ShellExecute Form1.hwnd, vbNullString, "aide.chm", vbNullString, App.Path, 1
End If
End Sub

Merci d'avance pour l'aide que vous m'apporterez

Sébastien VALAT

2 réponses

Messages postés
360
Date d'inscription
vendredi 24 août 2001
Statut
Membre
Dernière intervention
9 juillet 2008
3
Ouhlala, malheureux!!!, comme c'est bien moche comme procédure pour ouvrir un .chm !! Alors qu'il existe déjà une fnction toute prête, et bien propre de surcroit !

Declare Function HtmlHelp Lib "hhctrl.ocx" Alias "HtmlHelpA" ( _
ByVal hwndCaller As Long, _
ByVal pszFile As String, _
ByVal uCommand As Long, _
ByVal dwData As Long _
) As Long

==============
Site Web de JDPROG
Présentation de MP3 Index
Logiciel d'indexation de fichier MP3

http://jdprog.fr.st
0
Messages postés
71
Date d'inscription
mardi 29 janvier 2002
Statut
Membre
Dernière intervention
6 janvier 2011
1
Il faut déclarer le fichier chm comme étant un fichier d'aide : App.HelpFile = Chemin & MonFichier.chm

Si on appuie sur F1 ça marche.
Pour lancer le fichier depuis un bouton, j'utilise SendKeys "{F1}" et ça marche aussi.
Simple, pas d'API. Cool quoi !!
0