Главная страница | назад





Article #16890: Playing MPEG files in Delphi apps

 Question and Answer Database

FAQ1890D.txt   Playing MPEG files in Delphi apps
Category   :VCL
Platform    :All
Product    :All 32 bit  

Question:
How can I play an MPEG file in Delphi apps?

Answer:
Providing the Windows MMSystem layer has a MPEG decoder installed,
you can easily use the MultiMedia play a MPEG file by setting the
filename to the path of the MPEG file.

Example:

procedure TForm1.Button1Click(Sender: TObject);
begin
  MediaPlayer1.Filename := 'C:\DownLoad\rsgrow.mpg';
  MediaPlayer1.Open;
  MediaPlayer1.Display := Panel1;
  MediaPlayer1.DisplayRect := Panel1.ClientRect;
  MediaPlayer1.Play;
end;


7/16/98 4:31:28 PM
 

Last Modified: 01-SEP-99