Achso, jetzt weiß ich was du meinst
Da reicht ein TMediaplayer völlig aus. Ändere einfach den Filename wärend der Laufzeit so:
Delphi-Quellcode:
procedure Button1.click;
begin
mediaplayer1.AutoEnable:= true;
mediaplayer1.FileName:='dein 1. lied.mp3';
mediaplayer1.open;
mediaplayer1.Play;
button2.visible:= true;
button3.visible:= true;
end;
procedure Button2.click;
begin
Mediaplayer1.filename:='dein 2. lied.mp3';
mediaplayer1.play;
end;
procedure button3.click;
begin
Mediaplayer1.filename:='dein 3. lied.mp3';
mediaplayer1.play;
end;
Wenn Button2 und 3 visible:= false sind dürfte alles glatt laufe
