mediaplayer播放时出现‘no MCI device open’的错误，不知所措！！

mediaplayer已经在播放一首歌，现在我想换一首，通过以下代码实现
procedure TForm1.N12Click(Sender: TObject); procedu