Display Devices

Just starting out? Need help? Post your questions and find answers here.
BackupUser
PureBasic Guru
PureBasic Guru
Posts: 16777133
Joined: Tue Apr 22, 2003 7:42 pm

Post by BackupUser »

Restored from previous forum. Originally posted by darklordz.

I created a 3d game launcher using teh help of the following snippet

Code: Select all

Structure DISPLAY_DEVICE
   cb.l
   DeviceName.b[32]
   DeviceString.b[128]
   StateFlags.l
   DeviceID.b[128]
   DeviceKey.b[128]
EndStructure 

dd.DISPLAY_DEVICE\cb=SizeOf(DISPLAY_DEVICE)


cr.s=Chr(10)
id.l=0
While EnumDisplayDevices_(0,id,@dd,0)
  devname$=PeekS(@dd\DeviceName[0])
  devstring$=PeekS(@dd\DeviceString[0])
  devid$=PeekS(@dd\DeviceID[0])
  devkey$=PeekS(@dd\DeviceKey[0])
  MessageRequester("",devname$+cr+devstring$+cr+devid$+cr+devkey$,0)
  id=id+1 
Wend
this code retreives all data from a registry folder. That folder ontains otehr drivers like NetMeeting driver. How do I get Just Display Drivers noting else ?