Professor_J.C.
12-11-2010, 19:41
Здравствуйте,
я разрабатываю программу Moskva.fm Grabber (http://forum.oszone.net/thread-180032.html) которая загружает эфиры радиостанций и формате mp4 (аудио). Одна из функций программы заключается в воспроизведении созданного файла по нажатию кнопки. Код обработчика события выглядит следующим образом:
procedure TMainForm.PlayBtnClick(Sender: TObject);
var
PlayP: string;
begin
PlayP:=Copy(Play, 2, Length(Play)-2); //убираем двойные кавычки вокруг пути
ShellExecute(Handle, nil, pchar(PlayP), nil, nil, SW_RESTORE);
end;
На сколько я знаю, ShellExecute должен выполнить дефолтное действие над файлом в сопоставленной этому расширению программе, но на практике не происходит ничего.
Путь проверял неоднократно, он всегда передается корректно.
Как запустить воспроизведение mp4-файла в сопоставленном ему приложении?
я разрабатываю программу Moskva.fm Grabber (http://forum.oszone.net/thread-180032.html) которая загружает эфиры радиостанций и формате mp4 (аудио). Одна из функций программы заключается в воспроизведении созданного файла по нажатию кнопки. Код обработчика события выглядит следующим образом:
procedure TMainForm.PlayBtnClick(Sender: TObject);
var
PlayP: string;
begin
PlayP:=Copy(Play, 2, Length(Play)-2); //убираем двойные кавычки вокруг пути
ShellExecute(Handle, nil, pchar(PlayP), nil, nil, SW_RESTORE);
end;
На сколько я знаю, ShellExecute должен выполнить дефолтное действие над файлом в сопоставленной этому расширению программе, но на практике не происходит ничего.
Путь проверял неоднократно, он всегда передается корректно.
Как запустить воспроизведение mp4-файла в сопоставленном ему приложении?