MPEG no Delphi

Delphi

26/11/2003

Alguém sabe como fazer para rodar um arquivo MPEG em um panel utilizando o compontente TMediaPlayer, ou, se existe alguma forma ou código específico.

Obrigado

CBier.


Cbier

Cbier

Curtidas 0

Respostas

Cebikyn

Cebikyn

26/11/2003

Assim:

begin
  MediaPlayer1.Filename := ´C:\Downloads\arquivo.mpg´; 
  MediaPlayer1.Open; 
  MediaPlayer1.Display := Panel1; 
  MediaPlayer1.DisplayRect := Panel1.ClientRect; 
  MediaPlayer1.Play;
end;



GOSTEI 0
POSTAR