Simple MP3 player
Delphi's MediaPlayer component (TMediaPlayer) lets you add audio and/or video clips to your application. Use this component to play, stop, pause, etc... an audio or video file with almost no coding from your part.
Here's the quickest way for setting up a simple MP3 player:
procedure TForm1.Button1Click(Sender: TObject); begin MediaPlayer1.Close; MediaPlayer1.FileName := 'c:\music\test.mp3'; MediaPlayer1.Open; end;
When the program is started, all the buttons of the media player are disabled. After clicking Button1, you'll notice that the MediaPlayer's play button is automatically enabled. Now click the play button and notice how it is automatically disabled when the music starts, but the pause- and stop-button become enabled. All without any coding from you :-)
Now, for just playing MP3 files, our player doesn't need so many buttons. In the Object Inspector, you can change the property VisibleButtons and limit the buttons to just these three: btPlay, btPause and btStop. This gives us the following mini MP3 player:
To be continued...
|DelphiLand Club||Members of the DelphiLand Club receive our Crash Course Delphi, plus the fully commented source code of numerous projects, plus guaranteed answers from our Delphi Forum. Membership is for life!|