In ein Notify event ein Stop, Close oder sonst sowas einzubauen ist auch fraglich! Das könnte auch Probleme machen.
Vielleicht geht das?
Delphi-Quellcode:
If Mediaplayer1.Mode = mpPlaying then
begin
with MediaPlayer1 do
begin
Notify := False;
Stop;
//showmessage('Mediaplayer wird geschlossen');
Application.ProcessMessages; // NEU
Sleep(1); // NEU
Application.ProcessMessages; // NEU
Close;
end;
end;
Der MediaPlayer ist auch nicht so dolle