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

Вниз

Плеер   Найти похожие ветки 

 
Opera ©   (2003-04-08 22:26) [0]

Помогите пожалуйста!!!
A: В своем плеере как узнать сколько длится песня и показать это в Label1, и в Label2 показывать сколько она уже играет.

B: Не подскажите код как в плеере TrackBar"ом перематывать играющюю песню!!

Используемый мною компонент TMediaPlayer
Помогите пожалуйста!!!


 
Lister   (2003-04-10 16:15) [1]

У плеера есть свойство Length. Это длина песни в миллисекундах (правда режимы можно менять). Делаешь таймер на одну секунду, в его обработчике пишешь:

//минуты и секунды:
label1.caption:=intTostr(mp1.length/1000) div 60 +":"+ intTostr(mp1.length/1000) mod 60;

Нетрудно сделать и обратный отсчет.


 
Lister   (2003-04-10 16:20) [2]

Добавляю, а то ошибся вначале

У плеера есть свойство Length. Это длина песни в миллисекундах (правда режимы можно менять). Делаешь таймер на одну секунду, в его обработчике пишешь:

//минуты и секунды:
label2.caption:=intTostr(mp1.position/1000) div 60 +":"+ intTostr(mp1.position/1000) mod 60;

label1.caption можно в обработчике таймера не писать, она все равно не меняется


 
Kair ©   (2003-04-12 21:01) [3]

Label2.Caption:=FormatDateTime("nn:ss",
MediaPlayer1.Position/(24*3600000));

MediaPlayer1.Position:=Trunc(
MediaPlayr1.Length*(TrackBar1.Position/TrackBar1.Max));



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

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

Наверх




Память: 0.47 MB
Время: 0.019 c
6-10330
MikeFW
2003-05-29 12:17
2003.08.04
отправка сообщений в локальной сети


14-10447
Е-Моё имя
2003-07-18 09:42
2003.08.04
Кто знает шведский язык? ;)))


1-10216
Relaxxx
2003-07-20 15:43
2003.08.04
Позиция слова в Мемо


1-10259
Andy BitOff
2003-07-21 14:47
2003.08.04
Запрет выполнения любых сообщений?


4-10526
Leon
2003-06-03 14:33
2003.08.04
Сохранение через реестр