Der opstod et problem under initialisering af MCI

Jeg er ved at lave en medieafspiller, men støder på et problem. Når jeg trykker play kommer den med en fejl:

Der opstod et problem under initialisering af MCI

Her er play koden:

procedure TForm2.ListBox1DblClick(Sender: TObject);
var
  mp3: TMusikFil;
begin
try
form1.MediaPlayer1.close;
except
end;
mp3 := Pointer(Listbox1.Items.Objects[Listbox1.ItemIndex]);
form1.MediaPlayer1.Filename := mp3.Filelocation;
form1.MediaPlayer1.Open;
form1.MediaPlayer1.Play;
end;

Er der nogen af jer der kan se hvorfor den gør det???

Mvh
Jesper