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

Вниз

Секунды трека   Найти похожие ветки 

 
Profi ©   (2004-01-14 18:44) [0]

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


 
zapped ©   (2004-01-16 22:48) [1]

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


 
Profi ©   (2004-01-18 02:12) [2]

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


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

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

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


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

Дополнение для кода от 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 18:20) [5]

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



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

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

Наверх




Память: 0.47 MB
Время: 0.025 c
11-1062753303
<Falcon>
2003-09-05 13:15
2004.04.25
Merge в KOLmdvXLGrid - а как навесить на FormOnShow?


1-1081586948
Insert
2004-04-10 12:49
2004.04.25
Проигрывание *.mov


3-1080327973
Gambit
2004-03-26 22:06
2004.04.25
Синхронизацыя 2 таблиц paradox


4-1077483069
Nick Denry
2004-02-22 23:51
2004.04.25
Menu а-ля Office XP. Ownerdraw.


3-1080651804
Glorfindel
2004-03-30 17:03
2004.04.25
Delphi 7 +ADO+ MSSQL 7.0