home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 11 / CDACTUAL11.iso / cdactual / demobin / share / os2 / VPREVAL / THREADS._ / 1010.0 < prev    next >
Encoding:
Text File  |  1994-02-17  |  235 b   |  12 lines
  1. Arg window self
  2.  
  3.  
  4. /* Get item value THREADLST List Box */
  5. value = VpGetItemValue(window,'THREADLST')
  6.  
  7. if value > 0 then
  8.    CALL VpThread "KILL", value
  9.    
  10. /* Select item REFRESH Push Button */
  11. CALL VpSelect window,'REFRESH'
  12.