Unterbrechen beim laden vom Mediaplayer verhindern

[Die Muhkuh]

Hier:

Delphi-Quellcode:

 FMusik[0] := ExtractFilePath(Application.ExeName) + 'Sound\Musik1.mid';
  FMusik[1] := ExtractFilePath(Application.ExeName) + 'Sound\Musik2.mid';

  mpPlayer.FileName := FMusik[1];
  mpPlayer.Open;
  mpPlayer.Play;