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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 21.07.2012, 16:03   #1
DIMMUA
Пользователь
 
Регистрация: 06.07.2012
Сообщений: 13
По умолчанию Смена визуализации в WindowsMediaPlayer (WMPLib_TLB)

Добрый день, установил ActiveX компонент WindowsMediaPlayer (WMPLib_TLB).

И не могу разобраться, как изменять визуализацию. Задача такая:
1. Если открывается kar файл, то запустить "Visualizations => VividLirics => Seven Lines "
2. Если запускается аудиво файл (mp3, wav и т.д.), то получить список всех доступных "Visualizations", выбрать из них какой-то (скорей всего случайным образом) и установить.
3. Если открывается видео, то вроде делать ничего не надо...



Читал WMPLib_TLB и пытался его понять. Нашел вот такие функции:

Код:
// ****************************************************//
// Interface: IWMPLayoutSettingsDispatch
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {B2C2D18E-97AF-4B6A-A56B-2FFFF470FB81}
// ***************************************************//
  IWMPLayoutSettingsDispatch = interface(IDispatch)
    ['{B2C2D18E-97AF-4B6A-A56B-2FFFF470FB81}']
...
function Get_showEffects: WordBool; safecall;
procedure Set_showEffects(pVal: WordBool); safecall;
...
Но у ума не приложу как ими воспользоваться Также в этом файле искал по слову "Effects" - тоже по находил что-то, но для меня жуть... Помогите разобраться.

Последний раз редактировалось DIMMUA; 21.07.2012 в 16:07.
DIMMUA вне форума Ответить с цитированием
Старый 22.07.2012, 20:55   #2
DIMMUA
Пользователь
 
Регистрация: 06.07.2012
Сообщений: 13
По умолчанию

Я извиняюсь, может ни кто не хочет устанавливать себе ActiveX компонент WindowsMediaPlayer, чтобы написать мне пару строк кода? Я понимаю, поэтому прикрепил файл WMPLib_TLB.pas. У меня проблема не с визуализацией, а с пониманием самого файла... Оказывается, если написать "WMPLib_TLB и точку", то появится много интересного, подскажите, может это мне как-то поможет:





Может, этот WMPEffects надо как-то регистрировать? На третьем скине, как мне кажется, показаны настройки для визуализации "Battery"...
Вложения
Тип файла: zip WMPLib_TLB.zip (49.3 Кб, 40 просмотров)
DIMMUA вне форума Ответить с цитированием
Старый 23.07.2012, 15:32   #3
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

а может стоит порыть на msdn?
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 23.07.2012, 18:06   #4
DIMMUA
Пользователь
 
Регистрация: 06.07.2012
Сообщений: 13
По умолчанию

Цитата:
Сообщение от Пепел Феникса Посмотреть сообщение
а может стоит порыть на msdn?
я бы с радостью, там горы информации, но у меня проблемы с теорией - путаюсь во многом... Если бы кто пару примеров показал, я бы наверно дальше сам и понял
DIMMUA вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
WindowsMediaPlayer событие остановки Silentdi Мультимедиа в Delphi 1 30.06.2012 13:10
При попытке скачать MP4 через WebBrowser запускается WindowsMediaPlayer demiancz Работа с сетью в Delphi 0 08.03.2012 19:06
Средства для визуализации таблиц в БД Crasty БД в Delphi 5 28.12.2009 18:45
Вопрос по визуализации задачи SIV84 Microsoft Office Excel 4 10.01.2009 23:55