Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

MediaPlayer [D6, D7, Win95/98, WinME, NT4, Win2k, WinXP]

vajo © (2004-05-06 19:05:00)
Подскажите компанент для медиаплейера. Нашел компанент DSPack, всё хорошо, но только у него недостаток. Моргает изображение после паузы.
Может есть еще какие-нибудь?

vajo (2004-05-13 13:43:00) [1]
>Mihey
А вот по поводу того-что не найдены методы и свойства (FileName, ReadyState, Duration, DisplayMode, Play
), это может зависеть от версии виндовс (у меня ХР).
Проект с этим плеером будет работать в др. виндах?

Mihey (2004-05-11 20:35:00) [2]
На сайте Microsoft.

vajo (2004-05-11 19:00:00) [3]
При написаниии имени компанента (WMP1) в тексте программы выпадает список методов и тд. - можно где-то почитать про них?

vajo (2004-05-11 18:57:00) [4]
>Mihey
FileName, ReadyState, Duration, DisplayMode, Play
- не найдены идентификаторы

*BES* (2004-05-07 21:59:00) [5]
Tbassplayer вне конкуренции!!!!

Mihey (2004-05-06 23:04:00) [6]
Кстати, через ActiveX можно использовать Windows MediaPlayer (должен быть установлен выше версии 6.4, а более высокие версии уже у всех поголовно).

Устанавливается через Component ->Import ActiveX Control. Надо выбрать Windows Media Player (version 1.0) и переименовтаь его из TMediaPlayer в другое что-нибудь, типа TWMP, так как есть уже такой копмонент.

Играть через так:

...
public
dTotalFrames: Double;
dTotalTimeSecs: Double;
dFramerate: Double;
...

if OpenDialog1.Execute then
begin
WMP1.FileName := OpenDialog1.FileName;
while WMP1.ReadyState < 3 do
Application.ProcessMessages;

// Get Length in frames
WMP1.DisplayMode := 1; // 1 = Frames
dTotalFrames := WMP1.Duration;

// Get length in seconds
WMP1.DisplayMode := 0 ; // 0 = Time
dTotalTimeSecs := WMP1.Duration;

// Framerate
if dTotalTimeSecs > 0 then
dFramerate := DTotalFrames / dTotalTimeSecs;

WMP1.Play
end;

Mihey (2004-05-06 22:57:00) [7]
TSmartMediaPlayer

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »