Obtenir la version de direct x installée

Commenter

Contenu du snippet

cette source permet de récupérer la version de directx installée sur la machine, il faut coller la dll dsetup.dll dans le dossier system de windows ( disponible entre autres dans les SDK direct x)
c'est un code VB6

Source / Exemple : 


Private Declare Function DirectXSetupGetVersion Lib "dsetup.dll" (dwVersion As Long, dwRevision As Long) As Long 'fonction qui récupère les infos version directx
Dim lMajor As Long, lMinor As Long 'valeurs retournées par la fonction DirectXSetupGetVersion
Private Const Hmajorminor As Long = &HFFFF0000 'filtrage octet poids fort
Private Const Lmajorminor As Long = &HFFFF 'filtrage octet poids faible

Private Sub Form_Load()
ret = DirectXSetupGetVersion(Major, Minor) ' récupération de la version dans major et minor , ret = 0 si ca a pas marché
Hmajor = Major - (Major And Hmajorminor) 'filtrage poids fort poids faible
lMajor = Major - (Major And Lmajorminor) 'filtrage poids fort poids faible
Hminor = Minor - (Minor And Hmajorminor) 'filtrage poids fort poids faible
lMinor = Minor - (Minor And Lmajorminor) 'filtrage poids fort poids faible
MsgBox ("version directx : " & Hmajor & "." & lMajor & "." & Hminor & "." & lMinor)'affichage version
End Sub

Conclusion :


merci de me dire si il y a des bugs , des os incompatible etc ...

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (mongol77)