mp3 player

**Gohac**

hallo zusammen,
ich fange gerade erst an mit delphi und habe das Tutorial auf

http://www.delphi-tutorials.tk gefunden und den audio player erstellt.
ging soweit auch recht gut wollte dann aber ein paar zusätzliche fuktionen drin haben (ohne videos) aber schau da gerade nicht mehr durch.

hier erstmal der code

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.Button2Click(Sender: TObject);

begin

if Form2.Listbox1.Items.Count=0 then

begin

   if Opendialog1.Execute then

begin

  Form2.Listbox1.Items.Add(Opendialog1.FileName);

  Mediaplayer1.FileName:=Form2.Listbox1.Items[song];

  Mediaplayer1.open;

  MediaPlayer1.Play;

  Timer1.Enabled:=true;

  Progressbar1.Max:=Mediaplayer1.Length;

  end;

 end;

end;

das ist der play button es soll so fuktionieren das wenn kein lied in der playlist ist das dann opendialog geöffnet wird. das geht auch aber sowie ein lied in der playlist ist passiert nichts wenn man auf play klickt.

brauche eure hilfe finde im inet nichts was mir weiter helfen könnte.

danke schonmal im vorraus

mp3 player

mp3 player

Forumregeln