Форум программистов  
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

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

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

Ответ
 
Опции темы
Старый 15.09.2017, 22:14   #1
rAMEO
Пользователь
 
Регистрация: 12.04.2014
Адрес: Россия
Сообщений: 29
Репутация: 10
По умолчанию 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.

__________________
NRM Rameo1986@mail.ru

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

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

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

icq: 468407295
skype: uberchel
По умолчанию

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

skype: raw_2_raw
По умолчанию

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



Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Не удается определить тип is2000 C# (си шарп) 3 03.11.2016 14: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 02:19




15:22.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru