Behaviors

ALSO SEE:


WHAT IS IT
FEATURES
UPDATE HISTORY
PRICING & LICENSING
SYSTEM REQUIREMENTS
ONLINE HELP
USER INTERFACE
TUTORIALS & SAMPLES
BEHAVIORS
DOWNLOAD

MPEG ADVANCE XTRA:

TOGGLE FULLSCREEN PLAYBACK


	Toggle Fullscreen Playback Drop this behavior over a target Mpeg Advance Xtra sprite to enable fullscreen playback when the video initializes. The user can also choose to enable/disable fullscreen playback when the sprite is clicked and if the aspect ratio of the video is maintained, using the parameters provided in the behavior.

	-- Mpeg Advance Xtra Full Screen behavior -- You are free to use, modify and redistribute this code with your Director projects property pFullScreenAtStart property pFullScreenOnClick property pIsFullScreen property pOriginalStageRect property pOriginalSpriteRect property pPreserveAspectRatio on mouseUp me if pFullScreenOnClick then me.toggleFullScreen() end if end on beginSprite me if pFullScreenAtStart then me.toggleFullScreen() end if end on toggleFullScreen me if not pIsFullScreen then pOriginalStageRect = (the stage).rect pOriginalSpriteRect = sprite(me.spritenum).rect.duplicate() (the stage).rect = the desktoprectlist[1] if not pPreserveAspectRatio then --simply fill the whole monitor sprite(me.spritenum).rect = the desktoprectlist[1] else --calculate aspect ratio, and adjust the scaling accordingly spriteaspect = float(sprite(me.spritenum).member.videowidth)/float(sprite(me.spritenum).member.videoheight) desktoprect = the desktoprectlist[1].duplicate() screenaspect = float(desktoprect.right - desktoprect.left)/float(desktoprect.bottom - desktoprect.top) put spriteaspect put screenaspect if spriteaspect = screenaspect then --same aspect ratio, simply fill the whole monitor sprite(me.spritenum).rect = the desktoprectlist[1] else --different aspect ratio, find out which one is bigger if spriteaspect > screenaspect then --sprite width is the limiting factor scalingfactor = float(desktoprect.right - desktoprect.left)/float(sprite(me.spritenum).member.videowidth) newheight = scalingfactor * float(sprite(me.spritenum).member.videoheight) marginheight = (float(desktoprect.bottom - desktoprect.top) - newheight)/2.0 sprite(me.spritenum).rect = rect(integer(desktoprect.left),integer(desktoprect.top+marginheight),integer(desktoprect.right),integer(desktoprect.bottom-marginheight)) else --sprite height is the limiting factor scalingfactor = float(desktoprect.bottom - desktoprect.top)/float(sprite(me.spritenum).member.videoheight) newwidth = scalingfactor * float(sprite(me.spritenum).member.videowidth) marginwidth = (float(desktoprect.right - desktoprect.left) - newwidth)/2.0 sprite(me.spritenum).rect = rect(integer(desktoprect.left+marginwidth),integer(desktoprect.top),integer(desktoprect.right-marginwidth),integer(desktoprect.bottom)) end if end if end if pIsFullScreen = true else (the stage).rect = pOriginalStageRect sprite(me.spritenum).rect = pOriginalSpriteRect updatestage --force the stage to redraw, necessary in MacOS Classic the stagecolor = the stagecolor updatestage pIsFullScreen = false end if end on endsprite me if pIsFullScreen then me.toggleFullScreen() end if end on getPropertyDescriptionList set description = [:] addprop description, #pFullScreenAtStart, [#default: false, #format:#boolean, #comment: "Enable full screen at beginsprite:"] addprop description, #pFullScreenOnClick, [#default: true , #format:#boolean, #comment: "Toggle full screen on click:"] addprop description, #pPreserveAspectRatio, [#default: false, #format:#boolean, #comment: "Preserve aspect ratio of video sprite:"] return description end on getBehaviorDescription me return "Drag to video sprite to enable it to resize the stage and play in full screen mode." & RETURN & "PARAMETERS:" & RETURN & "• Enable full screen at beginsprite - When enabled the movie will go in full screen mode as soon as the video sprite is initialized" & RETURN & "• Toggle full screen on click - Determines if full screen mode will be enabled and disabled when the user clicks on the video sprite." end
	DIRECTOR VERSIONS:		AUTHOR:		LAST UPDATED:
	8.5, MX, 2004, 11		Tabuleiro		March, 2008