Oder der Progressbar etwas zeit geben zum zeichnen.
Delphi-Quellcode:
Progress := trunc(100 * (Bass_ChannelGetPosition(Channel, BASS_POS_BYTE) / Bass_ChannelGetLength
(Channel, BASS_POS_BYTE)));
if (ProgressBar1.Position <> Progress) then
ProgressBar1.Position := Progress;
Bei mir ist Progress die aktuelle Position im stream.
Vor allem entlastet diese abfrage die CPU doch ungemein.
Dokumentation mit und ohne vergleich