Histórico da Página

Aviso
Componente descontinuado e não suportado pelo SmartClient HTML

Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css
Portuguese

Pagetitle

	Classe TMediaPlayer

...

Colapse ALL

Expand ALL

	Classe

...

TMediaPlayer

Cria um objeto para reprodução de vídeos e áudios.

Hierarquia

TControl
- TMediaPlayer

Construtores

Inclusão de trecho

	Classe TMediaPlayer - Construtores
	Classe TMediaPlayer - Construtores
nopanel	true

Propriedades

Inclusão de trecho

	Classe TMediaPlayer - Propriedades
	Classe TMediaPlayer - Propriedades
nopanel	true

Métodos

Inclusão de trecho

	Classe TMediaPlayer - Métodos
	Classe TMediaPlayer - Métodos
nopanel	true

Observações

Este componente utiliza tecnologia ActiveX, através do Windows Media Player®, desta forma estando

...

homologado apenas para os sistema operacionas da Microsoft®, dentre eles:

Windows XP
Windows Vista
Windows 7
Windows 8

...

O Windows Media Player® pode depender de Codecs específicos para reprodução dos arquivos MP4, como teste basta executar este arquivo diretamente na ferramenta da Microsoft®, caso funcione nesta, a reprodução ocorrera sem problemas no TMediaPlayer.

Importante: Este componente está disponível em versões superiores à 120420A.

Nota

icon	true
title	Atenção

SmartClient HTML
Os formatos de arquivos homologados para SmartClient HTML são: MP4, MOV, WMV e MP3

Exemplos

Bloco de código

language	cpp
theme	Eclipse
linenumbers	true
collapse	false

#INCLUDE "TOTVS.CH"
USER FUNCTION TMediaPlayer()

Hierarquia

TSrvObject -> TControl -> TMediaPlayer

Construtores

New

Método construtor da classe.

Sintaxe

TIBrowser(): New ( [ nRow], [ nCol], [ nWidth], [ nHeight], [ oWnd], [ cFile], [ nVolume], [ lShowBar] ) --> oObjeto

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
nRow	Numérico	Indica a coordenada vertical em pixels ou caracteres.
nCol	Numérico	Indica a coordenada horizontal em pixels ou caracteres.
nWidth	Numérico	Indica a largura em pixels do objeto.
nHeight	Numérico	Indica a altura em pixels do objeto.
oWnd	Objeto	Indica a janela ou controle visual onde o objeto será criado.	X
cFile	Caractere	Indica o nome do arquivo de mídia(MP4 ou MP3), que caso preenchido iniciara automaticamente a reprodução .
nVolume	Numérico	Indica o volume de audio, de 0 a 100
lShowBar	Boleano	Se .T. indica que será exibida a barra de comandos do próprio Windows Media Palyer®

Retorno

oObjeto

()

Retorna o objeto criado.

Observações

Exemplos

oMedia := TMediaPlayer():New(1, 1, 200, 200, oDlg, "c:/dir/file.mp4", 70, .T.)

Métodos

GoHome

OpenFile

Abre e inicia a reprodução de um arquivo de mídia.

Sintaxe

TMediaPlayer(): Openfile([cFile]) -->

Observações

Exemplos

oMedia:OpenFile("c:/fir/file.mp3")

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
cFile	Caracter	Indica o nome do arquivo de mídia(MP4 ou MP3), que caso preenchido iniciara automaticamente a reprodução .	X

SetShowBar

Habilita a exibição da barra de ferramentas do Windows Media Player®.

Sintaxe

TMediaPlayer(): SetShowBar( <lShow> ) -->

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
lShow	Boleano	Se .T. indica que será exibida a barra de comandos do próprio Windows Media Palyer®	X

Observações

Exemplos

oMedia:SetShowBar(.T.)

SetVolume

Ajusta a altura do volume de áudio.

Sintaxe

TMediaPlayer(): SetColume([nVolume] ) -->

Observações

Exemplos

oMedia:SetVolume(70)

Nome	Tipo	Descrição	Obrigatório	Referência
nVolume	Numérico	Indica o volume de audio, de 0 a 100	X

Exemplos

#include "TOTVS.CH"
User Function TMedia()

local nLeft := 1

   local nTopBtn := 202

local lShowBar


    local showBar := .F.


    local

nVolume

isMute :=

70

 .F.
    local

cFile

nVolume :=

"c:/dir/file.mp3"

 70

    SetStyle(5)

    DEFINE MSDIALOG oDlg TITLE "TMediaPlayer" FROM 0,0 TO 424,

404

510 PIXEL



        oMedia := TMediaPlayer():New(1,nLeft,

200

255,200,oDlg,

cFile

"c:/garbage/file.mp4",nVolume,

lShowBar)

showBar)

        TButton():New( nTopBtn, nLeft, "Open", oDlg,;


            {|| oMedia:openFile( FWInputBox("Escolha o arquivo", "c:/garbage/") ) },;
            28,010,,,.F.,.T.,.F.,,.F.,,,.F. )



        TButton():New( nTopBtn, nLeft+=28, "Play", oDlg,;


            {|| oMedia:play() },;
            28,010,,,.F.,.T.,.F.,,.F.,,,.F. )



        TButton():New( nTopBtn, nLeft+=28, "Pause", oDlg,;


            {|| oMedia:pause() },;
            28,010,,,.F.,.T.,.F.,,.F.,,,.F. )



        TButton():New( nTopBtn, nLeft+=28, "Stop", oDlg,;


            {|| oMedia:stop() },;
            28,010,,,.F.,.T.,.F.,,.F.,,,.F. )



        TButton():New( nTopBtn, nLeft+=28, "SetVolume", oDlg,;


            {|| oMedia:setVolume( Val( FWInputBox("Escolha a altura do volume [0-100]", cValToChar(oMedia:nVolume)) ) ) },;
            28,010,,,.F.,.T.,.F.,,.F.,,,.F. )



        TButton():New( nTopBtn, nLeft+=28, "GetVolume", oDlg,;


            {|| MsgAlert( oMedia:nVolume ) },;
            28,010,,,.F.,.T.,.F.,,.F.,,,.F. )



        TButton():New( nTopBtn, nLeft+=28, "ShowBar", oDlg,;

{||

lShowBar

showBar:=!

lShowBar

showBar, oMedia:setShowBar

( lShowBar

( showBar ) },;
            28,010,,,.F.,.T.,.F.,,.F.,,,.F. )

        TButton():New( nTopBtn, nLeft+=28, "nPlayCount", oDlg,;
            {|| oMedia:nPlayCount := ( Val( FWInputBox("Escolha o numero de repetições", cValToChar(oMedia:nPlayCount)) ) ) },;
            28,010,,,.F.,.T.,.F.,,.F.,,,.F. )

        TButton():New( nTopBtn, nLeft+=28, "SetMute", oDlg,;
            {|| isMute:=!isMute, oMedia:setMute( isMute ) },;
            28,010,,,.F.,.T.,.F.,,.F.,,,.F. )

ACTIVATE MSDIALOG oDlg CENTERED

return

Preview

Exemplo da classe TMediaPlayer

Image Removed



RETURN

Resultado do Exemplo

Image Added

Abrangência

Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

...

Árvore de páginas

Versões comparadas

Versão antiga 8

Nova versão Atual

Chave

Hierarquia

Construtores

Propriedades

Métodos

Observações

Exemplos

New

Método construtor da classe.

OpenFile

Abre e inicia a reprodução de um arquivo de mídia.

SetShowBar

Habilita a exibição da barra de ferramentas do Windows Media Player®.

SetVolume

Ajusta a altura do volume de áudio.

Resultado do Exemplo

Abrangência