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

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

Прокрутка песен [D7, WinXP]


Steep ©   (2006-09-14 09:02:00) 

Есть самый простенький проигрыватель.
Есть код на перемещение трекбара
//TB_Track трекбар
if TB_Track.Focused=true then //если не ставить фокус то проигрывание подглючивает
begin
MP.Stop//MP компонента плеера (стандартная)
MP.Position:=TB_Track.Position;
MP.Play;
end;
// на таймер поставлен код
TB_Track.Position:=MP.Position;
//
Но так при перемещении  трекбара песню "глючит", а хотелось бы как в винампе перемещение песни только при опускании трекбара.
Не подскажате как сделать?


Steep   (2006-09-14 10:45:00) [1]

Пасип!
Ассамблер я в универе изучать буду :)
А в делфи разбираюсь потихоньку


ЮЮ   (2006-09-14 10:10:00) [2]

Код в таймере приводит в вызову кода в TrackBare.

Следует различать изменения в TrackBare, сделанные пользователем и таймером. Хотя бы так:


// на таймер поставлен код
TB_Track.OnChange := nil;
try
 TB_Track.Position:=MP.Position;
finally
 TB_Track.OnChange := TB_TrackChange;  
end;

только при опускании трекбара
использовать компонент, который обладает нужным событием.
Я использовал TRxSlider


Elen   (2006-09-14 10:06:00) [3]


> Steep ©

Мечты... Мечты... Улетают-тают-тают... Ты хотя бы разберись с Делфой и API


Steep   (2006-09-14 10:03:00) [4]

:-) ну тык я его в этом году начну изучать! (ну в крайнем случае в следующем!) :)
Для меня важна скорость и размер!


Elen   (2006-09-14 10:00:00) [5]


> Steep ©

Так можно докатится до написания собственных прог на самом Его Величестве Асме Великом... Лучше возими готовы велосипед и приаттач к нему моторчик (от феррари :-) ) И покатаемся...


Steep   (2006-09-14 09:58:00) [6]

так хоть поймеш как создавать эти самые велосипеды, следственно начинаешь понимать как их ремонтировать :)


Elen   (2006-09-14 09:52:00) [7]


> Steep ©


П А Т Ч Е М М У   Л А М А Т??? Создатели это сами задокументировали для пользователей и даже с примерам!!! А Light Alloy вообще инсталить не надо. включи его в свой пакет и будет тее счестье. Ну учти с MP будет гемморойно...

P.S. Все любят хорошее... :-) Зачем изобретат велоSипед


Steep   (2006-09-14 09:41:00) [8]

Ето конечно все хорошо... А если у пользователя нет ни Winampa ни Light Allow?
Elen ты прям я смотрю любитель всего хорошего!!
Я конечно тоже, но свое люблю больше! :) поетому и пишу свое.., а как научусь можно и чужие ломать!!! :)


Elen   (2006-09-14 09:26:00) [9]


> Steep ©

Раз ты заинтересовался музыкой расскажу как я обхожу эти проблемы:
У меня есть проигрыватель Light Alloy и на него есть дока в которой описаны какие мессаги можно ему кидать для управления проигрывателем
Вот скажем LAC_PLAYBACK_STOP           = 100;
Хочу остановить проигрыш SendMessage(HandleLA,100,0,0)ю Все просто. У Винампа тоже есть подобное - так не проще тебе работать с ними а не с MP.
MP жутко грузит систему.

Но если хочеш избавиться от тормоза то КАК ВАРИАНТ выясняй над каким компонентом находится курсор. Если над TrackBar, то паузу на проигрыш.


Наверх

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