Ошибка при инициализации MCI

[EvgeniyVaravko]

на моём компе видео запускается без проблем. копирую папку с программой на другой компьютер. запускаю программу и выдает ошибку
''Ошибка при инициализации MCI'' . подскажите как исправить данную ошибку.

procedure TForm2.Button1Click(Sender: TObject);
begin
Panel2.Show;
MediaPlayer1.Close;
MediaPlayer1.FileName :=GetCurrentDir + '\1 Minute Timer.mp4';
MediaPlayer1.Display:=Panel2;
MediaPlayer1.Open;
MediaPlayer1.Play;

end;

[Sciv]

запускаю программу и выдает ошибку ''Ошибка при инициализации MCI''

А само видео иWMP при этом запускаются, если их из проводника открывать?

[EvgeniyVaravko]

из проводника всё запускается как на моем так и на другом компе .

[newerow1989]

Сообщение от EvgeniyVaravko

MediaPlayer1.FileName :=GetCurrentDir + '\1 Minute Timer.mp4';

Нужно, чтобы файл существовал по такому же адресу!
Либо на другом компьютере не установлены звуковые драйверы!

[EvgeniyVaravko]

т.е. при запуске плеера нужно устроить проверку на то, существует ли данный файл?я всё правильно понял?
Если да - то подскажите как.
P.S. я просто новичок в этом деле

[newerow1989]

Чему равно GetCurrentDir на обоих компьютерах?

Сообщение от EvgeniyVaravko

существует ли данный файл?

функция FileExists
http://www.delphibasics.ru/FileExists.php

if FileExists(MediaPlayer1.FileName) then
   //существует

[EvgeniyVaravko]

вот. первая картинка -это комп с делфи. вторая без делфи

[p51x]

К чему нам жтот путь? Файл там есть то или нет?

[EvgeniyVaravko]

конечно есть