Изменение положения трэка в TMediaPlayer

[SuperMooDuck]

Track Bar я сделал, он показывает положение от параметров position и length. А когда я изменяю position в плэере ничего не происходит. Может лучше чем нибудь другим проигрывать?

[Alex21]

А привязку кто делать будет?

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
  MediaPlayer1.Position:=TrackBar1.Position*1000;
end;

что касаемо (*1000): если что подстройте под свой вариант, смотря в каком виде идет перевод длины и текущей позиции в ТрэкБар.

[SuperMooDuck]

Как я и думал меня будут за ламера пинговать. Я не первый день делфи юзаю и я написал в первом посте что так не работает.

[SuperMooDuck]

Уже сам нашел

[Alex21]

Лучше всего будет создать свою полосу прокрутки на компонентах со свойствами MouseMove/Up/Down. Например Image.

[SuperMooDuck]

Я прямо на форме через canvas.

[GAGARIN-NEW]

Стоп !Всё гениально просто !
Во время проигрывания указываеш у прогрессбара макс позишн как длину песенки . потом делаеш соотношение длина прогрессбара/макс позишн прогрессбара (это типо коэффицэнт соотношения К) и потом при щелчке мышой умножаеш Х*К где Х - это координата при mousedown/up/move и присваеваеш медиаплеер1.позишн
Я думаю так для начала луче всего =)