o trecho do codigo que abre o video é: obs: mp -> componente mediaplayer video -> componente tpanel onde vai ser mostrado o video
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++ procedure TFormTerminal.TocaVinheta; var Rect : tRect; begin if FileExists(ExtractFilePath(paramstr(0))+'Vinheta.avi') then begin ProgressBar1.Max:=0; mp.Close; Rect.Left := 0; Rect.Right := Video.Width; Rect.Top := 0; Rect.Bottom := Video.Height; mp.DisplayRect := Rect; mp.FileName := ExtractFilePath(paramstr(0))+'Vinheta.avi'; mp.Open; mp.play; ProgressBar1.Max := mp.Length; end; end; +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ja tentei tambem... ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ procedure TFormTerminal.TocaVinheta; var Rect : tRect; begin if FileExists(ExtractFilePath(paramstr(0))+'Vinheta.avi') then begin ProgressBar1.Max:=0; mp.Close; mp.Display := video; mp.FileName := ExtractFilePath(paramstr(0))+'Vinheta.avi'; mp.Open; mp.play; ProgressBar1.Max := mp.Length; end; end; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ é nao deu certo nao. Em 04/10/06, Luiz Escobar <[EMAIL PROTECTED]> escreveu: > > vc ta usando o componente tmediaplayer do DELPHI ou vc IMPORTOU o > MEDIAPLAYER do windows ?? > > > Luiz Escobar > Analista/Desenvolvedor: > WEB - HTML/JavaScript/PHP/MySQL > WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase > DOS - Clipper/Assembler xBase > SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k > LINUX - LAZARUS/Kylix/MySQL; > http://www.megasistema.com.br > > > > > > ----- Original Message ----- > From: Rafael Jorge > To: delphi-br > Sent: Wednesday, October 04, 2006 10:05 AM > Subject: [delphi-br] [URGENTE] mediaplayer > > > to precisando de ajudo urgente. > desenvolvi uma aplicação multmidia para um cliente. > é um terminal onde o usuario seleciona um registro e aparece a descricao e > um video (em avi). > minha bronca é que eu nao to consequindo colocar o video do tamnho que > deveria. pois tem um painel la no form e o video deveria oculpar ele todo, > sendo esticado se necessario ou dimiduido sozinho. tinha que entregar isso > ontem mas nao consequi. alquem poderia me ajudar? agradaçe desde ja. > > -- > Rafael jorge alves > www.itrecife.com -> para verem meus artigos e trabalhos > t+ > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > -- Rafael jorge alves www.itrecife.com -> para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
