salam
projam injoorie : safheye aval ke miad chandta linke ke rooo harkodoomeshoon ke bezane mire safheye film o miare ke ye chizi shabihe media playere ke bampegadvancextra gozashtam ,albate fullscreen nistesh darhalate addi vali roo film ya ye dokme ke click mikone fullscreen mishe,vali chon too mohite fullscreen hichi nist mikham yejoori user o tojih konam ke bayad click kone ke exit beshe az fullscreen.filmam ham chon az monitor capture shode va safhash detail dare , mese neshoon dadane matn o inchiza khastam ke ba keifiat bashe vase hamin AVI kardameshoon ba codec e Cinepack.akhe Mpeg na keifiate AVI ro dare na too Mpeg advance ba oon sizi ke man mikham yani 1024 kar mikone.
merC
darzmen age ye komake dige ham mitooni bokoni mamnoonet misham.
man alan be filmam migam ke roosh click shod fullscreen beshe vali mikham va ye kalak zadam ye dokme gozashtam roo film ke user fekr mikone roo dokme ke click mishe fullscreen mishe , rahi hast ke dokmaro biroon az mohite filmam dashte basham va actione fullscreen behesh bedam.
behaviore fullscreen kardan ro ham az khode Helpe MpegAdvance estefade kardam injoorie :
-- 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
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]
sprite(me.spritenum).rect = the desktoprectlist[1]
pIsFullScreen = true
sprite(16).visible = FALSE
sprite(17).visible = 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
sprite(16).visible = TRUE
sprite(17).visible = 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:"]
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
