Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.09.2017, 21:14   #1
rAMEO
Пользователь
 
Регистрация: 12.04.2014
Сообщений: 45
По умолчанию Media Player Не удается определить тип устройства по указанному расширению имени файла

помогите разобратся
делфи ругается Media Player Не удается определить тип устройства по указанному расширению имени файла
вот код:
Код:
unit Unit_SSRZ;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, MPlayer, ExtCtrls;

type
  TForm_SSRZ = class(TForm)
    TSS: TTimer;
    MPSS: TMediaPlayer;
    PanelSSRZ: TPanel;
    procedure FormCreate(Sender: TObject);
    procedure TSSTimer(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form_SSRZ: TForm_SSRZ;

implementation

{$R *.dfm}

procedure TForm_SSRZ.FormCreate(Sender: TObject);
begin
MPSS.FileName:=ExtractFilePath(ParamStr(0)) + 'SS.mp4';
MPSS.Open;
MPSS.Play;
end;

procedure TForm_SSRZ.TSSTimer(Sender: TObject);
begin
TSS.Enabled:=false;
end;

end.

Последний раз редактировалось Аватар; 16.09.2017 в 08:23.
rAMEO вне форума Ответить с цитированием
Старый 16.09.2017, 08:10   #2
NetSpace
Участник клуба
 
Аватар для NetSpace
 
Регистрация: 03.06.2009
Сообщений: 1,792
По умолчанию

ExtractFilePath(Para mStr(0))
а путь извлекается из имени с чертой или без "\"?
Программирование - это единственный способ заставить компьютер делать то, что тебе хочется, а не то, что приходится.
NetSpace вне форума Ответить с цитированием
Старый 16.09.2017, 21:26   #3
Black Fregat
Программист
Участник клуба
 
Аватар для Black Fregat
 
Регистрация: 23.06.2009
Сообщений: 1,772
По умолчанию

Там специально целых две функции
ExtractFilePath - с разделителем
ExtractFileDir - без
Black Fregat вне форума Ответить с цитированием
Старый 17.09.2017, 02:03   #4
uberchel
Участник клуба
 
Аватар для uberchel
 
Регистрация: 19.01.2009
Сообщений: 1,455
По умолчанию

тут скорее всего декодер другой на видео, это же mmsystem.
uberchel вне форума Ответить с цитированием
Старый 12.10.2017, 21:31   #5
dummy_user
Форумчанин
 
Аватар для dummy_user
 
Регистрация: 02.03.2013
Сообщений: 109
По умолчанию

А что TMediaPlayer .mp4 воспроизводит?
dummy_user вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Не удается определить тип is2000 C# (си шарп) 3 03.11.2016 13:33
Media player waka2ebawer Мультимедиа в Delphi 6 15.08.2010 20:31
Перехват информации о тэгах проигрываемого файла из Windows Media Player DM_bite Мультимедиа в Delphi 3 14.10.2009 10:27
Media player Rio309 Компоненты Delphi 4 18.02.2008 01:19