Apresentação de Videos

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

Apresentação de Videos

Mensagem por asimoes »

Senhores,

Preciso de ajuda dos mais experientes em minigui ou hwgui.

É o seguinte: preciso criar uma aplicação que fique exibindo videos em sequencia, tipo acabou um começa o outro, em loop.

Alguém poderia me dar uma luz como fazer isto em minigui ou hwgui.

[]´s
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: Apresentação de Videos

Mensagem por sygecom »

Olá asimoes,
O Video é em AVI? se sim pode usar a Hwgui para isso, veja um exemplo:

Código: Selecionar todos

*********************
FUNCTION MsgRun(cMsg)
*********************
PRIVATE oTimHabla,oAnime

if cMsg=Nil
   cMsg:="Aguarde em processamento...."
endif

INIT DIALOG oDlgHabla TITLE "Processando..." NOEXIT NOEXITESC ;//NOCLOSABLE;
AT 0,0 SIZE 485,95 ;
ON EXIT {|| NoSaidaF4() };
STYLE DS_CENTER +WS_VISIBLE;
COLOR Rgb(255, 255, 255)

@ 45,20 SAY oTimHabla CAPTION cMsg SIZE 465,20;
FONT HFont():Add( '',0,-12,400,,,);
BACKCOLOR Rgb(255, 255, 255)

@ 5,20 ANIMATION oAnime ;
       OF oDlgHabla ;
       SIZE 32,32;
       FILE "res\processando.avi";
       AUTOPLAY

oAnime:Play()

HWG_DOEVENTS()

ACTIVATE DIALOG oDlgHabla NOMODAL

Return Nil
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

Re: Apresentação de Videos

Mensagem por asimoes »

Sygecom,

As funções ANIMATION E PLAYER já testei, sei que funcionam, mas o objetivo do projeto é criar um slide de videos, controlado pelo tempo de cada vídeo.
A idéia é reproduzir videos de 30 segundos +- em sequencia.

È como o Eric disse a função PLAYER poderia trabalhar com array de videos, ai resolve o problema.

[]´s
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: Apresentação de Videos

Mensagem por sygecom »

Buenas asimoes,
Acho que está faltando para você é apenas a logica, basta você colocar em um laço e mandar reproduzir um atras do outro e ainda pode definir o tempo de cada um com oAnimation:seek(5). A HAnimation é apenas uma classe para reproduzir Video, para isso que você quer um player para rodar seu video, acho que isso você tem que desenvolver.
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Responder