Gracias por responder, este es el codigo que utilizon que utilizo para mover el progressbar. Utilizo este este codigo en el evento onTimer del Clock:
Código Delphi
[-]
procedure TRockola.Timer2Timer(Sender: TObject);
var
SecondeTotal: Integer;
begin
if pbProgreso.Max <> 0 then
pbProgreso.Position := dj.Position;
sbProgreso.Position := dj.Position;
if sbProgreso.Position = sbProgreso.Max then begin
timer2.Enabled := False;
sbProgreso.Position := 0;
Timer2.Enabled := true;
end;
if TiempoPos then
SecondeTotal:=round(dj.Position /1000)
else
SecondeTotal := round((dj.Length-dj.Position) / 1000); affichage(lbTiempo, secondetotal, TiempoPos);
end;
Pero estaba haciendo pruebas con diferentes archivos de sonido y encontre el siguiente patron, los archivos que estan codificados a 128 kbps y 192 kbps
son los que tienen error las codificaciones 92, 320, etc funcionan normalmente, cual creen que pueda ser el problema los Codec, pero le instale varios codec. Espero puedan ayudarme gracias