home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_1 / DEV_TES / DEVTEST2.FRM (.txt) < prev   
Encoding:
Visual Basic Form  |  1993-10-01  |  3.7 KB  |  108 lines
  1. DevForm
  2. Device Tester
  3. Form15G
  4. Command1
  5. &Set as Default
  6. List1
  7. Label2
  8. Label1
  9. Default:
  10. @    Form_Load
  11. RetVal
  12. AppName:
  13. workedX
  14. GetProfileString
  15. Section
  16.     GetWinIni
  17.     lpAppName
  18.     lpKeyName
  19.     lpDefault
  20. lpReturnedString(
  21. nSize
  22. KeyNamee
  23. Default
  24. ReturnedString
  25. ErrCode
  26. Label1
  27. Caption
  28. Text1
  29. DeviceCount
  30. DeviceList
  31. LastPos
  32. BeginPos
  33. List1]
  34. LastNull
  35. Theen
  36. List1_ClickG
  37.     ListIndex
  38. DeviceInfo
  39. List2u
  40. Label2
  41. WriteProfileString?
  42. lpString
  43. Command1_Click
  44. PostMessageByString
  45. wParam
  46. lParam?
  47. HWND_BROADCASTH
  48. WM_WININICHANGE
  49. Label3
  50.     NewDevice
  51. Label4
  52. Lable4T
  53. GetDefault
  54. Label1_Click
  55. Label3_Clickr
  56. GetDevices
  57. SetNewDefault
  58. Label2_Click
  59. Form10
  60. Form_Activate
  61. Form_Resize
  62. IfMid
  63. CommaPos
  64. List3
  65.     RightPart
  66. linepart
  67. DeviceName
  68. ConnectionInfo
  69. devname
  70. ConnectToAdd
  71. MoreToFind
  72. NoMoreToFind
  73.     InfoCount
  74. NameOfDevice
  75. InternalNameN
  76.  Windows API Functions
  77. Kernel
  78. Kernel
  79. PostMessage
  80.  Windows API Constants
  81.  Device Arrays
  82. Command1_Click
  83.  Call sub to set new Default Device
  84.  Call sub to Get Default Device,
  85. Form_Load
  86.  Call sub to Get Default Devicea
  87.  Call sub to Get Device List
  88.  Start with First Item on List
  89. Form_Resize
  90.  Call sub to Get Default Device
  91. GetDefault
  92. Determine Default Device
  93. windows
  94. device
  95. GetDevices
  96.  Find Devices Installed 
  97. devices
  98.  Get Device's name as seen by user
  99.  Get Device's Internal Name and Connection Information
  100.  Parse out connection list and add to ListBoxf
  101.  1 indicates that 1st position is a null, no more entries)
  102. SetNewDefault
  103.  Get Name and Full Info of New Default Device from List BoxL
  104.  Update Win.INI and send BroadCast changes
  105. windows
  106. device
  107. windows
  108.