|
Tipp 0111
|
Installierte DirectX 9-Version ermitteln
|
|
|
Autor/Einsender: Datum: |
|
Alexander Csadek 27.03.2006 |
|
Entwicklungsumgebung: |
|
VB.Net 2003 |
DirectX-Version: |
|
DirectX 9 |
|
|
Für die Ermittlung der aktuellen DirectX 9-Version steht
der Namespace Microsoft.DirectX.Diagnostics zur Verfügung. Dazu wird dem Projekt ein Verweis auf das
Assembly hinzugefügt.
|
Alle DirectX-Komponenten befinden sich darin als Container und alle Eigenschaften
als Property.
|
Zuerst wird der Root-Container erzeugt um an alle anderen Container zu kommen. Die Versionsinformation befindet sich im Container
DxDiag_SystemInfo, der mit der Methode GetContainer geholt wird.
Danach können die drei interessantesten Eigenschaften ermittelt werden:
|
- dwDirectXVersionMajor
- dwDirectXVersionMinor
- szDirectXVersionLetter
|
|
|
Dim root As New Container(False)
Dim Version As String
Dim cd As ContainerData = root.GetContainer("DxDiag_SystemInfo")
Console.WriteLine("Container: " & cd.Name.ToString())
Dim pt As PropertyData = cd.Container.GetProperty( _
"dwDirectXVersionMajor")
Console.WriteLine("Property: " & pt.Name.ToString() & _
" Data: " & pt.Data.ToString())
Version = pt.Data.ToString() & "."
pt = cd.Container.GetProperty("dwDirectXVersionMinor")
Console.WriteLine("Property: " & pt.Name.ToString() & _
" Data: " & pt.Data.ToString())
Version &= pt.Data.ToString()
pt = cd.Container.GetProperty("szDirectXVersionLetter")
Console.WriteLine("Property: " & pt.Name.ToString() & _
" Data: " & pt.Data.ToString())
Version &= pt.Data.ToString()
Console.WriteLine("Die aktuelle Version ist: " & Version)
|
|
|
|
Dieser Tipp wurde mit der Managed DirectX Assembly Version 1.0.1901.0
erstellt, und um diesen Tipp ausführen zu können, muss die DirectX 9 for Managed Code Runtime als
Verweis in das Projekt eingebunden werden.
|
|
Windows-Version |
98/SE |
|
|
ME |
|
|
NT |
|
|
2000 |
|
|
XP |
|
|
Vista |
|
|
Win
7 |
|
|
|
|
Download (3,5
kB)
|
Downloads bisher: [ 245 ]
|
|
|