home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazin 1997 March / Image.iso / wd.dxr / Name_4_NamePfeilRunter.ls < prev    next >
Encoding:
Text File  |  1996-10-28  |  335 b   |  20 lines

  1. global gScrollWhichDir
  2.  
  3. on mouseUp
  4.   if the frame <> label("NameSelect") then
  5.     return 
  6.   end if
  7.   if gScrollWhichDir = #None then
  8.     set gScrollWhichDir to #OneDown
  9.   else
  10.     set gScrollWhichDir to #None
  11.   end if
  12. end
  13.  
  14. on mouseDown
  15.   if the frame <> label("NameSelect") then
  16.     return 
  17.   end if
  18.   set gScrollWhichDir to #down
  19. end
  20.