Roger Guay wrote:
I like yours better, Richard. Would you share your script with us?
Sure. It's a checkbox in my
soon-to-be-released-once-I-finish-compatibility-with-v8 devolution
toolkit - here's the script:
on UbuntifyRevMenubar
put the defaultStack into tSaveDS
set the defaultStack to "revMenubar"
lock screen
-- Menu text, and adjusting for new size:
set the textFont of stack "revMenubar" to "Ubuntu"
set the textSize of grp "revMenubar" to 13
put 6 into tX
put 0 into i
repeat for each line tMenu in (the controlnames of grp "revMenubar")
add 1 to i
if there is not a btn tMenu of stack "revMenubar" then next repeat
get the formattedWidth of btn tMenu of grp "revMenubar"
set the width of btn tMenu of grp "revMenubar" to it
set the left of btn tMenu of grp "revMenubar" to tX
add it+4 to tX
end repeat
-- Colors:
set the backcolor of this cd to "80,78,72" --the backcolor of stack
"4wDevo"
set the forecolor of this cd to gray90
set the topcolor of this cd to gray55
set the bottomColor of this cd to gray25
-- Give menus some breathing room:
put "File,Edit,Tools,Object,Text,Development,View,Window,Help" into
tMenus
put 2 into x
repeat for each item tMenu in tMenus
add 3 to x
set the width of btn tMenu of stack "revMenubar" \
to the formattedWidth of btn tMenu of stack "revMenubar"
set the left of btn tMenu of stack "revMenubar" to x
put the right of btn tMenu of stack "revMenubar" into x
end repeat
--
set the defaultStack to tSaveDS
end UbuntifyRevMenubar
It's been working well in v6 through v8.
--
Richard Gaskin
Fourth World Systems
Software Design and Development for the Desktop, Mobile, and the Web
____________________________________________________________________
ambassa...@fourthworld.com http://www.FourthWorld.com
_______________________________________________
use-livecode mailing list
use-livecode@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode
