EnumDisplaySettings: Unterschied zwischen den Versionen
K (NOTOC) |
K (vb) |
||
| Zeile 2: | Zeile 2: | ||
Die Funktion liefert Informationen über Anzeige-Einstellungen. Sie bietet die Möglichkeit die aktuellen Bildschirmeinstellungen wie Auflösung und Wiederholfrequenz auszulesen. | Die Funktion liefert Informationen über Anzeige-Einstellungen. Sie bietet die Möglichkeit die aktuellen Bildschirmeinstellungen wie Auflösung und Wiederholfrequenz auszulesen. | ||
| − | < | + | <vb>Declare Function EnumDisplaySettings Lib "user32" _ |
| − | Declare Function EnumDisplaySettings Lib "user32" _ | ||
Alias "EnumDisplaySettingsA" (ByVal lpszDeviceName _ | Alias "EnumDisplaySettingsA" (ByVal lpszDeviceName _ | ||
As Long, ByVal iModeNum As Long, lpDevMode As Any) _ | As Long, ByVal iModeNum As Long, lpDevMode As Any) _ | ||
| − | As Boolean | + | As Boolean</vb> |
| − | </ | ||
===Parameter=== | ===Parameter=== | ||
| Zeile 25: | Zeile 23: | ||
===Beispiel=== | ===Beispiel=== | ||
| − | < | + | <vb>Dim retval As Integer |
| − | Dim retval As Integer | ||
Dim iDevMode As Integer | Dim iDevMode As Integer | ||
Dim DevM As DEVMODE | Dim DevM As DEVMODE | ||
| Zeile 35: | Zeile 32: | ||
Debug.Print DevM.dmPelsWidth & " x " & DevM.dmPelsHeight & " @ " & DevM.dmDisplayFrequency & " Hz" | Debug.Print DevM.dmPelsWidth & " x " & DevM.dmPelsHeight & " @ " & DevM.dmDisplayFrequency & " Hz" | ||
iDevMode = iDevMode + 1 | iDevMode = iDevMode + 1 | ||
| − | Loop While retval <> 0 | + | Loop While retval <> 0</vb> |
| − | </ | ||
===Verweise=== | ===Verweise=== | ||
| Zeile 47: | Zeile 43: | ||
*[[ChangeDisplaySettings]] | *[[ChangeDisplaySettings]] | ||
*[[DEVMODE]] | *[[DEVMODE]] | ||
| − | |||
[[Kategorie:User32]] | [[Kategorie:User32]] | ||
Version vom 13. Mai 2008, 15:19 Uhr
Die Funktion liefert Informationen über Anzeige-Einstellungen. Sie bietet die Möglichkeit die aktuellen Bildschirmeinstellungen wie Auflösung und Wiederholfrequenz auszulesen.
<vb>Declare Function EnumDisplaySettings Lib "user32" _
Alias "EnumDisplaySettingsA" (ByVal lpszDeviceName _
As Long, ByVal iModeNum As Long, lpDevMode As Any) _
As Boolean</vb>
Parameter
lpszDeviceName
- Ein Zeiger auf einen nullterminierten String, der das Ausgabegerät bezeichnet, desses Eigenschaften ausgelesen werden sollen. 0 für das Ausgabegerät welches der aktuelle Thread nutzt.
iModeNum
- Eine Ganzzahl, die die Nummer des Ausgabegerätes angibt.
- Eine der Konstanten ENUM_CURRENT_SETTINGS oder ENUM_REGISTRY_SETTINGS, di angibt, ob die aktuell gesetzten oder die in der Registry hinterlegten und beim nächsten Systemstart gesetzten Werte ausgelesen werden.
lpDevMode
- Einen Zeiger auf eine DEVMODE-Struktur, deren Member dmSize und dmDriverExtra initialisiert sein müssen. dmSize muss die Größe der initialisierten Variable in Bytes enthalten, dmDriverExtra gibt an, wieviele Bytes extra initialisiert wurden, um zusätzliche Treiberinformationen aufzunehmen; sollte in VB 0 sein.
Rückgabe
Die Funktion gibt einen Wert des Types Long ungleich 0 bei Erfolg, den Wert 0 bei Misserfolg zurück. Der Rückgabewert 0 weist bei einer angegebenen Gerätenummer (2. Parameter) darauf hin, dass kein zugehöriges Ausgabegerät existiert. Die Funktion setzt die Eigenschaften: dmBitsPerPel, dmPelsWidth, dmPelsHeight, dmDisplayFlags, dmDisplayFrequency in der übergebenen DEVMODE-Struktur.
Beispiel
<vb>Dim retval As Integer Dim iDevMode As Integer Dim DevM As DEVMODE iDevMode = 0
Do
retval = EnumDisplaySettings(0, iDevMode, DevM) Debug.Print DevM.dmPelsWidth & " x " & DevM.dmPelsHeight & " @ " & DevM.dmDisplayFrequency & " Hz" iDevMode = iDevMode + 1
Loop While retval <> 0</vb>
