COMO POSSO EXCUTAR UM FILME .AVI ?

FFECHER 02/08/2007 19:47:03
#229198
Boa noite a todos

Preciso que de dentro de um form seja escolhido um clip em formato avi e esse clip seja mostrado dentro do media player . Alguem pode me ajudar a fazer procurei mas nao achei nada que fale sobre isso .
Desde ja agradeço

Fernando Fecher
THIAGO.CC 03/08/2007 09:30:37
#229264
FFecher,

Vc tem que incluir um componente do windows media player no seu formulario,
ele te dara todas os opções de codigos, como criar uma lista, executar direto do cd-rom,etc.

Espero ter ajudado
FFECHER 03/08/2007 12:04:08
#229333
Pois e isso eu consegui so que ai o filme passa dentro do form e cortado ou seja nao aparece a imagem inteira. por isso queria executar realmente o media player ai o usuario pderia ver o clip todo.
THIAGO.CC 03/08/2007 12:20:19
#229339
FFecher,

coloca o codigo para eu dar uma olhada.
RICATOM 03/08/2007 12:51:28
#229341
Abra seu form maximizado (ou coloque uma opção para isso) e no form_resize ajuste o componente do media player.
USUARIO.EXCLUIDOS 03/08/2007 15:48:32
#229373 Resposta escolhida
a função Shell não te ajuda não?
FFECHER 03/08/2007 16:32:03
#229393
Consegui a rotina aqui mesmo no vbmania VISUALIZADOR DE FILMES .AVI porem nao consigo mostrar toda a imagem dentro do form.
USUARIO.EXCLUIDOS 03/08/2007 16:40:06
#229395
Amigo, para abrir o arquivo Faça assim:

'Em um Módulo

Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

[c]Public Function AbrirAVI(Caminho as string)
    Call ShellExecute(0&, vbNullString, Caminho, vbNullString, vCaminho, vbNormalFocus)
End Function



Para Chamar a função:

Call AbrirAVI(Caminho_do_seu_AVI)

[/c]
Tópico encerrado , respostas não são mais permitidas
Voltar