And yes - getActiveTab() and getNoTabs() no longer work from CPO's or
message box - I think they have moved to different locations....
function cons_GetTabScriptObjects
-- set the defaultStack to "revTranscriptGadget"
-- put getActiveTab() into activeTab -- (in Cons. stack script;
returns number of the active tab)
-- put getNoTabs() into numOfTabs -- (in Cons. stack script;
returns the number of tabs in use)
put the long id of group "tabs" of cd 1 of stack
"revConstellation" into consTabGroup
put the number of buttons in consTabGroup into maxBtns
repeat with btnNum = 1 to maxBtns
put the long id of btn btnNum of consTabGroup into
consTabButton
if the label of consTabButton is not space then
put the cObjectID of consTabButton into scriptObject --
(long id of any tab's object)
put scriptObject & return after scriptObjects
end if
end repeat
delete last char of scriptObjects
return scriptObjects
end cons_GetTabScriptObjects
function cons_GetNumberOfTabs
put 0 into theRealNoBtns
put the long id of group "tabs" of cd 1 of stack
"revConstellation" into consTabGroup
put the number of buttons in consTabGroup into maxBtns
repeat with btnNum = 1 to maxBtns
put the long id of btn btnNum of consTabGroup into
consTabButton
if the label of consTabButton is not space then
add 1 to theRealNoBtns
end if
end repeat
return theRealNoBtns
end cons_GetNumberOfTabs
_______________________________________________
use-revolution mailing list
use-revolution@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
