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

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

Компоненты TrackBar и MediaPlayer


disciple ©   (2004-02-12 09:11:00) 

Уважаемые мастера!

Подскажите, пожалуйста, как сделать так, чтобы меняя мышью позицию ползунка TrackBar менялась позиция MediaPlayer.

На данный момент у меня просто при проигрывании файла меняется положение ползунка.
Я использовал компонент Timer, в котором написал следующее:

  with MediaPlayer do
     TrackBar1.Max:=32000;
     TrackBar1.Min:=0;
     
    TrackBar1.Position:= (32000*Position/Length);


able   (2004-02-14 13:32:00) [1]

Лучше используй событие onChange(); у тракбара..


disciple   (2004-02-14 13:24:00) [2]

Спасибо, за помошь!
 Но дело в том, что TrackBar1.position имеет тип integer, а
 MediaPlayer1.position  -  longint. Поэтому происходит    несостыковка.

 А ввобще эту процедуру изменения где лучше оформлять?
Я попробовал в событии OnChange компонента TrackBar, но не получилось.


A22   (2004-02-13 17:39:00) [3]

кхм, ну задай MediaPlayer.Position := TrackBar.Position


Наверх

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