|
Registriert seit: 9. Jun 2006
59 Beiträge
Delphi 6 Professional
|
Re: Hintergrundmusik
12. Jun 2006, 17:32
Hallo,
 Endless looping with the TMediaPlayer
Sonst könnte man in einen Timer oder in ein Ereignis, wenns sowas gibt, beim Beenden der Wiedergabe das schreiben:
Delphi-Quellcode:
If (Mediaplayer.position > EndPos) and (Loop = true) then
begin
Mediaplayer.position := StartPos;
MediaPlayer.Play;
end;
Gruß
|