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

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

Секунды трека [D7, WinXP]


Profi ©   (2004-01-14 18:44:00) 

Привет народ! Такая проблемма: уже почти написал проигрователь, но вот правильно время трека отобразить не могу. Модуль bass вообще ничего не дает, а mmsystem какуюто чушь, то-бишь минуты вместо секунд, да еще и в четыре раза больше! Подскажите, как быть?


Intell   (2004-01-18 18:20:00) [1]

Верное замечание! Забыл написать.


sss1   (2004-01-18 17:54:00) [2]

Дополнение для кода от Intell'a:
if MediaPlayer1.FileName<>'' then
Label1.Caption := 'Length ' +
FormatDateTime ('nn:ss', mediaPlayer1.Length / (1000 * 24 * 60 * 60));

если ты воспроизводишь видео, то со временем получится нехорошая ситуфция!, Поэтому нужно определить правильный формат времени:
MediaPlayer1.TimeFormat:=TFMilliseconds;
-//-


Intell   (2004-01-18 10:44:00) [3]

У меня код только на TMediaPlayer:

if MediaPlayer1.FileName<>'' then
Label1.Caption := 'Length ' +
FormatDateTime ('nn:ss', mediaPlayer1.Length / (1000 * 24 * 60 * 60));


Profi   (2004-01-18 02:12:00) [4]

В секундах и минутах, ясное дело! Но минуты идут за место секунд, я их еще делю на 4, а в результате получается, что в минуте 64 секунды!!! Бред!


zapped   (2004-01-16 22:48:00) [5]

а в чём время достаёшь? в каких единицах?


Наверх

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