Farbflash projects: Imaging lingo table | 3-D scene list | Find all | Handler menu | Lingo message window

Ignore:
Timestamp:
10/24/08 12:12:09 (4 years ago)
Author:
alex
Message:

updated movie to incorporate new version of library scripts

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/lingosource/castlib2/resizeWindowScripts.ls

    r14 r18  
    1  
     1-- resizeWindowScripts 
     2----------------------------------- 
     3-- CREATED: 
     4-- 2008-04-17 at 01:54 
     5-- 
     6-- PROPERTIES: 
     7--!memberProperties: [#name: "resizeWindowScripts", #scripttype: #movie, #scriptSyntax: #lingo, #comments:"~/Documents/Scripts/lingo/resizeWindowScripts.ls"] 
     8-- 
     9-- DESCRIPTION: 
     10--             moviescript to handle the resizeWindow event and send it to all sprites 
     11--             the sprites can have the "newResizableStageBehavior" in order to act according 
     12--             to their gpdl settings 
     13-- 
     14-- REQUIRES: 
     15-- (Prerequisites) 
     16-- 
     17-- USAGE: 
     18--             in order to make this script work initialize it as soon as possible (for example startmovie) 
     19--             and set the minimum and maximum sizes for the window 
     20-- 
    221-- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
    322-- xxxxxxxxxxxxxxxxxx add the following call to startmovie 
    4  
    5  
     23-- 
    624--on startmovie 
    725--  ... 
    8  
     26-- 
    927-- xxxxxxxxxxxxxxxxxx 
    1028-- edit the min and max sizes for the window here: 
     
    1331-- mInitResizeWindowSystem minmaxSize 
    1432-- ... 
    15  
     33-- 
    1634--  end 
     35----------------------------------- 
     36 
    1737 
    1838 
     
    167187    newRect = aw.rect 
    168188     
    169     glob = call(#mGetGlobalList, [mGetXScript(#commonmoviescript)]) 
     189    glob = call(#mGetGlobalList, mGetXScript()) 
    170190    oldar = glob.getaprop(#gCurrentStageRect) 
    171191     
     
    218238  else 
    219239     
    220     theRect = call(#mGetPrefValue, [mGetXScript(#GetSetPrefs)], #gWindowRect) 
     240    theRect = call(#mGetPrefValue, mGetXScript(#GetSetPrefs), #gWindowRect) 
    221241     
    222242    if ilk(theRect) = #rect then 
Note: See TracChangeset for help on using the changeset viewer.