[Vagabundo]

Делаю:

MediaPlayer1.FileName := '1.mp3';
MediaPlayer1.Open;
MediaPlayer1.Play;

Если после этого попытаться сделать:

StreamF := TFileStream.Create('1.mp3', fmCreate);

То ругается, что процесс не может получить доступ к файлу, так как этот файл занят другим процессом.
Перепробовал все:

MediaPlayer1.Close;
MediaPlayer1.Free;

и даже

MediaPlayer1.Destroy;

Ничего не помогает. Помогает только открытие другого файла:

MediaPlayer1.FileName := '2.mp3';
MediaPlayer1.Open;

В чем проблема? Как заставить MediaPlayer отпустить файл 1.mp3 по-хорошему?