Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.01;
Скачать: CL | DM;

Вниз

MediaPlayer   Найти похожие ветки 

 
vajo   (2004-05-06 19:05) [0]

Подскажите компанент для медиаплейера. Нашел компанент DSPack, всё хорошо, но только у него недостаток. Моргает изображение после паузы.
Может есть еще какие-нибудь?


 
Mihey ©   (2004-05-06 22:57) [1]

TSmartMediaPlayer


 
Mihey ©   (2004-05-06 23:04) [2]

Кстати, через 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;


 
*BES* ©   (2004-05-07 21:59) [3]

Tbassplayer вне конкуренции!!!!


 
vajo   (2004-05-11 18:57) [4]

>Mihey
FileName, ReadyState, Duration, DisplayMode, Play
- не найдены идентификаторы


 
vajo   (2004-05-11 19:00) [5]

При написаниии имени компанента (WMP1) в тексте программы выпадает список методов и тд. - можно где-то почитать про них?


 
Mihey ©   (2004-05-11 20:35) [6]

На сайте Microsoft.


 
vajo   (2004-05-13 13:43) [7]

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



Страницы: 1 вся ветка

Текущий архив: 2004.08.01;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.044 c
1-1090097687
Arm79
2004-07-18 00:54
2004.08.01
Как сохранить строку в св-ве Objects типа TStringList?


3-1089118762
Акуля
2004-07-06 16:59
2004.08.01
на разработке


3-1089029073
Алексей
2004-07-05 16:04
2004.08.01
Excel и БД


1-1090335590
RedLord
2004-07-20 18:59
2004.08.01
народ как узнать создан или нет обект в рантайме


4-1087321937
juiceman
2004-06-15 21:52
2004.08.01
адрес оконной функции