Media Player Loop

[ichbins]

mach es einfach so:

Delphi-Quellcode:

procedure button1click;
begin
  mediaplayer1.play;
end;
 
procedure tform1.mediaplayer1onnotify(sender:tobject);
begin
  mediaplayer1.play;
end;

bei mir geht das.