Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Время воспроизведения мп3 ?


NetKnight ©   (2003-07-31 02:56:00) 

Что-то у меня странное получается, может формулу не правильно вывел?

Time := FileLength/(Bitrate/1024*8);

Ответ получается с разностью в 5-10 секунд от того, что должно полуатся... Причём не зависимо от длинны песни... Может вычитать что-то надо?


waw   (2003-08-04 12:18:00) [1]

waw@mtb.zp.ua - напиши мне по этому адресу
или по аське 107640544

Пиришлю тебе готовый модуль, в нем видно как производятся расчеты.


NetKnight   (2003-08-04 04:20:00) [2]

--> waw
А что такое dwScale? B и как его узнать?

Битрейт беру из заголовка, FileLength функцией FileSize.


waw   (2003-07-31 14:42:00) [3]

RateDIVScale := dwRate div dwScale;
TimeLength := TimeToStr((dwLength / (dwRate / dwScale))*1000/MiliSecPerDay);


Помоему так. Только где ты берешь FileLength и Bitrate?


Наверх

Титульная страница Поиск, карта сайта Написать письмо