Thanx Greg.
;)
on 21/09/06 0:05, Greg Bowman at [EMAIL PROTECTED] wrote:
> I found a good example in the MBS documentation on the web site that
> works for me in calculating the FPS. I'm returning it as a string, but
> you could format it however you need. I also use an editablemovie
> instead of a regular movie because certain properties were showing as 0,
> which they shouldn't have (movieheight, moviwidth, etc.)
>
> function VideoFPS(m as editablemovie) as string
> dim ts,time,duration As Integer
>
> ts=m.TimeScaleMBS
>
> time=0
> if m.NextInterestingVideoTimeMBS(time,duration) then
> if time=-1 then return "unknown"
> time=duration
> if m.NextInterestingVideoTimeMBS(time,duration) then
> return str(ts/duration)
> end if
> else
> Return "unknown"
> end if
> end function
>
>
> Greg
----------------------
RB 2006 PRO
----------------------
RB 5.5.5 on OS X Tiger
----------------------
Dominik Fusina
- France -
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
