Changeset 215 for trunk/lingosource/castlib1/simpleBMMenu.ls
- Timestamp:
- 12/15/08 13:00:15 (3 years ago)
- File:
-
- 1 edited
-
trunk/lingosource/castlib1/simpleBMMenu.ls (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/lingosource/castlib1/simpleBMMenu.ls
r180 r215 1 -- simpleBMMenu 2 ----------------------------------- 3 -- DESCRIPTION: 4 -- behavior on the btton to show the menu 5 -- invoke the menu on mousedown and stay hilited until the menu is disposed 6 -- the menu calls mUnhilite, if it is closed 7 -- 8 -- REQUIRES: 9 -- none (uses sendSprite() to send the "menu open" event to a sprite named like it is defined in the GPDL) 10 -- 11 -- USAGE: 12 -- drag this behavior onto a sprite with a member of type #text 13 ----------------------------------- 14 15 16 1 17 property pMenuSpritename 2 18 -- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 3 19 4 20 on mouseDown me 5 spr = sprite(me.spritenum)6 spr.member.color = rgb(255, 255, 255)7 sprite(xscr().mGetKanal(#blueBackGround)).rect = spr.rect -- blue background21 mem = sprite(me.spritenum).member 22 mem.color = rgb(255, 255, 255) 23 mem.bgcolor = rgb("#106fe7") 8 24 updatestage 9 25 sendSprite(xscr().mGetKanal(pMenuSpritename), #mShowOSCMenu, me.spritenum) … … 27 43 28 44 on mUnhilite me 29 sprite(me.spritenum).member.color = rgb(20, 20, 20) 30 sprite(xscr().mGetKanal(#blueBackGround)).locV = -1000 -- blue background 45 mem = sprite(me.spritenum).member 46 mem.color = rgb(20, 20, 20) 47 mem.bgcolor = rgb(255, 255, 255) 31 48 end if
Note: See TracChangeset
for help on using the changeset viewer.
