[UltraBloxX]

Привязать к таймеру (TTimer)

Интервал поставить на 1000
В процедуре на событие таймера прописать

Код:

MediaPlayer1.Position:=TrackBar2.Position;

А так же когда плеер не активен таймер можно отключать.