Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
1-10195
lovres
2003-07-23 10:01
2003.08.04
Child - окна MDI


3-10144
DBDev
2003-07-11 15:40
2003.08.04
Проблемы с использованием dtsrun-a с клиентских машин!


7-10480
fil
2003-05-25 11:58
2003.08.04
Автозагрузка программы как сервис в win NT 2000 XP


14-10372
Beginner3000
2003-07-16 00:26
2003.08.04
---|Ветка была без названия|---


14-10360
Aga
2003-07-16 18:57
2003.08.04
Перенос программ




   Наверх