Hi Eric,
Just write a resizeStack handler and set the dimensions of the
objects accordingly :-)
See the resizeStack message in the docs.
For instance:
on resizeStack pNewWidth,pNewHeight,pOldWidth,pOldHeight --
parameters values are provided by the engine
local tRect,tLoc
-----
set the right of img "TitleBarRight.png" to pNewHeight
-----
put the rect of img "TitleBarMain.png" into tRect
put pNewHeight into item 3 of tRect
set the rect of img "TitleBarMain.png" to tRect
-----
put the rect of img "AluBg.png" into tRect
put pNewHeight into item 3 of tRect
set the rect of img "AluBg.png" to tRect
-----
set the loc of grp "Tabs" to the width of this cd / 2,item 2 of
the loc of grp "Tabs"
-----
put the rect of fld "input" into tRect
put (pNewHeight - 2) into item 3 of tRect
put (pNewWidth - 22) into item 4 of tRect
set the rect of fld "input" to tRect
set the vScrollBar of fld "input" to the formattedHeight of fld
"input" > the height of fld "input"
if the dontWrap of fld "Input" then set the hScrollBar of fld
"input" to the formattedWidth of fld "input" > the width of fld "input"
-----
put the loc of fld "Title" into tLoc
put pNewHeight / 2 into item 1 of tLoc
set the loc of fld "Title" to tLoc
-----
set the right of grp "Copy" to the right of grp "Tabs" + 1
set the right of grp "Help" to pNewHeight - 10
-----
set the bottom of grp "Replace" to pNewWidth + 6
-----
put the rect of img "AluBgBottom.png" into tRect
put pNewHeight into item 3 of tRect
set the rect of img "AluBgBottom.png" to tRect
set the bottom of img "AluBgBottom.png" to pNewWidth
set the top of grc "Line" to pNewWidth - 1
-----
set the bottomRight of btn "Mac Style Stack Resizer" to pNewHeight
- 3, pNewWidth - 3
end resizeStack
Note that you need not to lock the screen: the engine does it for
you :-)
Le 8 juin 05 � 22:55, �ric Miclo a �crit :
Does someone know if there is a way to set an object's geometry by
script and where I can find some documentation to write the
corresponding scripts.
Best regards from Paris,
Eric Chatonet.
----------------------------------------------------------------
So Smart Software
For institutions, companies and associations
Built-to-order applications: management, multimedia, internet, etc.
Windows, Mac OS and Linux... With the French touch
Plugins, tutorials and more on our website
----------------------------------------------------------------
Web site http://www.sosmartsoftware.com/
Email [EMAIL PROTECTED]/
Phone 33 (0)1 43 31 77 62
Mobile 33 (0)6 20 74 50 86
----------------------------------------------------------------
_______________________________________________
use-revolution mailing list
[email protected]
http://lists.runrev.com/mailman/listinfo/use-revolution
