home *** CD-ROM | disk | FTP | other *** search
/ Windoware / WINDOWARE_1_6.iso / source / getwlst / vbswitch.frm (.txt) < prev    next >
Visual Basic Form  |  1991-07-16  |  2KB  |  66 lines
  1. Form1
  2. VB Task Switcher
  3. Form1
  4. TaskList
  5. Switch
  6. Switch
  7.     TaskEnder
  8. End Task
  9. Command1_Click
  10. SendMessage
  11. Form1T
  12. hTheWnd
  13. WM_GETTEXTI
  14. Text1&
  15. Form_Click
  16. @    Form_Load
  17. NumWnds
  18. OpenWindows
  19. GetOpenWindows\
  20. OpenWindown
  21. IntegerDim
  22. Text2
  23. TaskList_Clickk
  24. WindowName
  25. TaskList
  26. nLength
  27. Switch_Click
  28.     ListIndex!
  29. ActivateApp
  30. FillTaskList
  31. Form_GotFocus
  32. TaskListBox
  33. GetFocus
  34. LB_RESETCONTENT6
  35. TaskList_DblClick
  36. Switch{
  37. Click
  38. Value
  39. OpenTask
  40. TaskEnder_Click
  41. EndTask
  42. Hints
  43. reads
  44. part<
  45.  Application Notes
  46.  1.  Do not set the Sorted Property of the list box to TRUE.
  47.  Doing so will have frustrating, albeit humorous, repercussions.
  48.  2.  Unlike Task Manager, this application will _not_ close if you
  49.  move the focus to another application.  This was not meant to be 
  50.  a completely implemented Task Manager-like application; it wasw
  51.  meant to demonstrate a possible use of the GetWindowList function.o
  52.  (Even though I guess I did get a little carried away...  The VB app
  53.  took much longer to write than the DLL did.)
  54.  3.  (EXE only) If there are no windows (other than VBSWITCH) on the desktop
  55.  when VBSWITCH is loaded, you may get an Invalid Property Valuel
  56.  error.  The solution to this is (as they say) left as an exercise
  57.  for the reader
  58.  (Hint:  look for the code that reads, in part:r
  59.  TaskListBox.ListIndex = 0 and consider wrapping it an a conditional
  60.  that checks the number of items in the list box...)    
  61. Form_Load
  62. Switch_Click
  63. TaskList_DblClick
  64.     Switch.Value = -1   ' A listbox doubleclick acts like a switch push
  65. TaskEnder_Click
  66.