Delphi-Quellcode:
procedure TForm1.FormDestroy(Sender: TObject);
begin
BASS_ChannelStop(NoiseStream);
BASS_StreamFree(NoiseStream);
Bass_Free;
end;
Hier ist alles bis auf das Bass_Free nicht nötig, da ein StreamFree immer auch den channel stopt und ein BassFree für jeden vorhandenen Stream einmal StreamFree aufruft.
Rosa Rauschen:
Wikipedia hat die Grundlagen
hier ist der Matheteili noch etwas genauer