In dem RenderTimer hab ichs eingebaut:
Delphi-Quellcode:
procedure TFormPlayer.TimerRenderTimer(Sender: TObject);
var FFTFata : TFFTData; WaveData : TWaveData;
begin
if BASS_ChannelIsActive(Channel) = BASS_ACTIVE_PLAYING then BASS_StreamPlay(Channel, False, 0);
TimerRender.Interval:= Spin.Value;
...
end;
Wieso kam vorher ein doppelpost