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





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