IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

 
 Ответить  Открыть новую тему 
> Ещё о Trackbar, Помогите пожалуйста розобраться!
сообщение
Сообщение #1


Помощник капитана
****

Группа: Пользователи
Сообщений: 601
Пол: Мужской
Реальное имя: Артем

Репутация: -  2  +


У меня следующая проблема.В моем плеере (TMediaPlayer) я использую перемотчик с помощью Trackbar.
Вот мой код:

procedure TMPGrand.TrackBar2Change(Sender: TObject);
begin
MediaPlayer1.Position := TrackBar2.Position;
MediaPlayer1.Play;
end;
///////////////////////////////////////////////// mega_chok.gif
procedure TMPGrand.Timer2Timer(Sender: TObject);
begin
Trackbar2.Position:=MediaPlayer1.Position;
end;

Всё отлично ходит и перематывает но...Через каждую секунду медиаплеер тащит за собой TrackBar. НО при этом происходит заикание!Пробовал изминить значение Timer.Interval на 3000. А ТОЛКУ!Теперь заикается через 3 секунды!Дайте пожалуста хороший код!


--------------------
Dum spiro spero!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 




- Текстовая версия 22.11.2017 17:54
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"