[Edos]

В общем народ... срочняк надо всё это сделать без трекбара. вместо бегунка у меня компонент image с изображением бегунка, вместо трека у меня компонент image с изображением трека. мне это надо для того чтоб не испортить дизайн. тоесть ясно да что бегунок и трек я нарисовал в фотошопе...
вот я сижу второй час а думать голова устала. вот настрочил маханький код. он вроде работает, и этот бегунок движется на определённое количество пикселей в секунду соответствующих времени видео, и вроде перематывается тоже правильно, но он всё равно местами подглючивает
вот код:

это часть которая отвечает что бегунок двигался в такт с видео ну чтоб прошла секунда видео и он сдвинулся на общее кол-во пикселей деленное на длину видео и множеное на 60. :
i:=mediaplayer1.Length;
a:=i/60000; b:=688/(a*60); c:=c+b;
image24.Left:=round(c);
label31.Caption:=inttostr(round(c));
if m1=true then image24.Left:=Round(m+c);
image25.Width:=image24.left;


это часть отвечающая за перемотку:

image24.Left:=x+image24.Left-10;
o8:=688-image24.Left;
o10:=(o8-688)*(-1);
o11:=o10*(mediaplayer1.Length/1376);
mediaplayer1.Position:=round(o11);
c:=mediaplayer1.Position/1376;
вот это вроде пашет но не фонтан конечно...
так- что если кому не лень разберитесь плиз...