Re: Monitor Name auslesen
Verfasst: 02.09.2014 00:34
achso.... ja, dann verstehe ich jetzt auch das Problem daran 
Ist eigentlich die gleiche Vorgehensweise. Du hast das wahrscheinlich bereits gemacht, aber trotzdem vollständigerhalber (falls ich dich richtig verstanden haben sollte^^):Hoto hat geschrieben:Wenn jetzt noch \\.\Display1 mit dem von PBs ExamineDesktops() übereinstimmt, ist alles perfekt. ^^
Code: Alles auswählen
EnableExplicit
#EDD_GET_DEVICE_INTERFACE_NAME = $00000001
Define a
Define DesktopTotal = ExamineDesktops()
Define DesktopName$
Define DeviceID$
Define MonitorName$
Define DD.DISPLAY_DEVICE\cb = SizeOf(DISPLAY_DEVICE)
For a=0 To DesktopTotal-1
DesktopName$ = DesktopName(a)
Debug DesktopName$
EnumDisplayDevices_(@DesktopName$, #Null, @DD, #EDD_GET_DEVICE_INTERFACE_NAME)
DeviceID$ = PeekS(@DD\DeviceID[0])
MonitorName$ = StringField(DeviceID$, 2, "#")
Debug MonitorName$
Debug "--------------------------------------------------"
NextJupp, der Code ist im nächsten Update drin.Hoto hat geschrieben:P.S. das wäre was für deine Webseite, da hab ich als aller erstes geguckt.