wenn ich das richtig verstanden habe sucht ihr nen replay (also ne loop funktion)
kannst ja auch mal im forum oder im web unter loop suchen, findest bestimmt haufen bsp
Delphi-Quellcode:
procedure Form1.MediaPlayer1Notify(Sender: TObject);
begin
If MediaPlayer1.Notify = True then
Begin
MediaPlayer1.Play;
End
else
Begin
MediaPlayer1.Stop;
End;
end;
Wenn die Loop-Funktion eingeschaltet wird, muss diese Zeile eingefügt werden ..
MediaPlayer1.Notify := True;
bzw. wenn sie ausgeschaltet werden soll ...
MediaPlayer1.Notify := False;
[edit=MrSpock]Code durch Delphi - Tags ersetzt. Mfg, MrSpock[/edit]