[SERЖant]

Форумчане, как сделать так , чтобы прокрутка песен была не TrackBar , а например картинка. Нужен рабочий вариант!

[M.A.D.M.A.N.]

Сообщение от SERЖant

Форумчане, как сделать так , чтобы прокрутка песен была не TrackBar , а например картинка. Нужен рабочий вариант!

Ты вообще что хочеш?

[The Shadow]

TrackBar рисованный наверно.

[M.A.D.M.A.N.]

Код:

function SolveForY(X, Z: LongWord): Byte;
begin
  if Z = 0 then Result := 0
  else Result := Byte(Trunc( (X * 100.0) / Z ));
end;

function GetPercentDone(FMinValue,FCurValue,FMaxValue:LongWord): Byte;
begin
  Result := SolveForY(FCurValue - FMinValue, FMaxValue - FMinValue);
end;

Admin: Читай правила форума по оформлению кода!

Функция переведет в проценты.(Для заливки или п ширине, как угодно)
Из процентов в число перевести сможеш?

[M.A.D.M.A.N.]

Уонечно все будет зависеть от масштаба движка и длины проигрываемого файла.