mongol77
Messages postés75Date d'inscriptiondimanche 2 octobre 2005StatutMembreDernière intervention24 juin 2007
-
27 mars 2006 à 13:11
mongol77
Messages postés75Date d'inscriptiondimanche 2 octobre 2005StatutMembreDernière intervention24 juin 2007
-
1 avril 2006 à 13:10
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
mongol77
Messages postés75Date d'inscriptiondimanche 2 octobre 2005StatutMembreDernière intervention24 juin 2007 1 avril 2006 à 13:10
tu m'as pris de vitesse Neo.balastik , j'allais justement ajouter cette astuce
Neo.balastik
Messages postés796Date d'inscriptionjeudi 17 mai 2001StatutMembreDernière intervention 5 mai 20097 29 mars 2006 à 10:28
La méthode ne me séduit pas vu qu'il y a obligation d'intégrer dsetup.dll dans System32.
Pourquoi ne pas aller chercher directement la version de DirectX dans la registry ?
Voici un exemple en VB utilisant WSH (WScript.Shell). On aurait pu passer par API, mais bcp plus de code...
Dim objShell
Dim strKey, strKey2
Dim strDirectXVersion
Dim arrayBytes, byt, s
'WSH est incapable de convertir une valeur binaire dans le registre.
'On transforme donc le résultat obtenu sous une forme compatible sinon il y aura erreur si
'l'on tente de lire directement la valeur
For Each byt In arrayBytes
s = s & Right("0" & Hex(byt), 2) & " "
Next
MsgBox "DirectX version " & strDirectXVersion & vbCrLf & "Installed Version (valeur binaire): " & s
Guy
econs
Messages postés4030Date d'inscriptionmardi 13 mai 2003StatutMembreDernière intervention23 décembre 200824 27 mars 2006 à 13:33
Disons que depuis hier soir, il est normal de ne pas avoir de commentaires.
Le dimanche soir => DODO
Le lundi matin => BOULOT
avec le METRO entre les deux.
Je ne connaissais pas la fonction que tu présentes ici. Elle est certes très pratique, mais difficile de poser un commentaire là-dessus.
Elle existe, elle fait bien son boulot. C'est bien, mais y'a pas grand chose à dire.
Ce n'est pas ta création personnelle, ta valeur ajoutée se situe juste dans la présentation de la chose ...
On ne va quand même pas noter une fonction pareille !
On peut juste te remercier de l'avoir partagée avec nous. Ca en aidera plus d'un !
mongol77
Messages postés75Date d'inscriptiondimanche 2 octobre 2005StatutMembreDernière intervention24 juin 2007 27 mars 2006 à 13:11
1 avril 2006 à 13:10
29 mars 2006 à 10:28
Pourquoi ne pas aller chercher directement la version de DirectX dans la registry ?
Voici un exemple en VB utilisant WSH (WScript.Shell). On aurait pu passer par API, mais bcp plus de code...
Dim objShell
Dim strKey, strKey2
Dim strDirectXVersion
Dim arrayBytes, byt, s
strKey = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\DirectX\Version"
strKey2 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\DirectX\InstalledVersion"
Set objShell = CreateObject("WScript.Shell")
strDirectXVersion = objShell.RegRead(strKey)
arrayBytes = objShell.RegRead(strKey2)
'WSH est incapable de convertir une valeur binaire dans le registre.
'On transforme donc le résultat obtenu sous une forme compatible sinon il y aura erreur si
'l'on tente de lire directement la valeur
For Each byt In arrayBytes
s = s & Right("0" & Hex(byt), 2) & " "
Next
MsgBox "DirectX version " & strDirectXVersion & vbCrLf & "Installed Version (valeur binaire): " & s
Guy
27 mars 2006 à 13:33
Le dimanche soir => DODO
Le lundi matin => BOULOT
avec le METRO entre les deux.
Je ne connaissais pas la fonction que tu présentes ici. Elle est certes très pratique, mais difficile de poser un commentaire là-dessus.
Elle existe, elle fait bien son boulot. C'est bien, mais y'a pas grand chose à dire.
Ce n'est pas ta création personnelle, ta valeur ajoutée se situe juste dans la présentation de la chose ...
On ne va quand même pas noter une fonction pareille !
On peut juste te remercier de l'avoir partagée avec nous. Ca en aidera plus d'un !
27 mars 2006 à 13:11
allez, au moins une petite note ;)