[Gambas-user] Problem to play flash (svf) movie

[Ron_1st]

On Thursday 03 September 2009, Almanova Sistemi wrote:
> Hello to everyone.
> 
> I'm writing an application in gambas2 for play various movies files.
> 
> I don't have any problems with mplayer that works very well but I can't
> play flash movies.
> 
> I use gnash for this.
> 
> My code:
> 
> PUBLIC SUB Play()
> DIM aHandle AS NEW Pointer[]
>   SELECT CASE LCase(Right(NumImmagini[Cont], 3))
>     CASE "avi", "mov", "vob", "swf"
>       Timer1.Enabled = FALSE
>       dwgMovie = NEW DrawingArea(FInput)
>       dwgMovie.Height = dwgImage.Height '455
>       dwgMovie.Width = dwgImage.Width '651
>       dwgMovie.X = dwgImage.X '182
>       dwgMovie.Y = dwgImage.Y '203
>       Filmato = (sWorkDir &/ "Immagini" &/ NumImmagini[Cont])
>       IF LCase(Right(NumImmagini[Cont], 3)) = "swf" THEN
>         $hProcess = EXEC ["gnash", "-1", "-x", dwgMovie.Handle, Filmato]
> FOR INPUT OUTPUT AS "$hProcess"
>       ELSE
>         $hProcess = EXEC ["mplayer", "-vo", "xv", "-nortc",
> "-framedrop", "-fs", "-quiet", "-wid", dwgMovie.Handle, Filmato, "-ss",
> "1.19", "-vf", "blackframe=100:32,scale=480:640"] FOR INPUT OUTPUT AS
> "$hProcess"
>       ENDIF
>   END SELECT
> 
> END
> 
> Can anyone help me?
> 
> Regards.
> Massimo

Be carefull, 'swf' is more a container and moving objects are called movie.
This does not mean it is a 'film' movie. That are 'flv' as seen on youtube.
It is posible to let swf show a 'film' movie by embed in the swf but
not every swf is therfore a movie.



Best regards,

Ron_1st

--