home *** CD-ROM | disk | FTP | other *** search
/ Boot Disc 1 / boot-disc-1996-08.iso / bootcd.dir / 00015_Script_15 < prev    next >
Text File  |  1996-07-02  |  954b  |  19 lines
  1. on mouseUp
  2.   global gSubCategory,gCategory,gThisExecutable,gExecutableLine
  3.   --Note that mouseLine only works on fields now, NOT text members
  4.   --This handler assumes that for every line in this field,
  5.   --there is a corresponding path and executable name on the SAME LINE
  6.   --of the corresponding subcategory lookuptable field.
  7.   --The name of the subcategory lookuptable field is generated
  8.   --with the formula: "WB" && gSubCategory && "Executables"
  9.   
  10.   set gExecutableLine = (the mouseLine)
  11.   put "gExecutableLine = " && gExecutableLine
  12.   --Hilite the selected line in this field and hilite the launch button
  13.   hilite line gExecutableLine of member (the mouseCast)
  14.   set the memberNum of sprite 12 = the number of member "Workbench Install Hilited"
  15.   updateStage
  16.   set executableMenu = "WB" && gSubCategory && "Executables"
  17.   set gThisExecutable = the pathname & line gExecutableLine of ¼
  18.     (the text of member executableMenu)
  19. end