Hi. ich brauche mal wieder eure hilfe
ich versuche mit hilfe der bass.dll eine '.flac' date aufzuzeichnen. dazu benutze ich die
LibFlac.dll
es funktioniert auch ziemlich gut mit 16 und 24 BPS, doch mir macht das 8 BPS schaffen
und ich finde das problem einfach nicht. 'the sound gets distorted'
siehe anhang.
Delphi-Quellcode:
Channel:= BASS_StreamCreate_(.....);
(* Create Encoder Channel *)
if not Assigned(FEncoderFlac) then
FEncoderFlac:= TEncoderFLAC.Create;
FEncoderFlac.Channels := Channels; // default 2
FEncoderFlac.Samplerate := Samplerate; // default 44100
FEncoderFlac.BitsPerSample := BitsPerSample; // default 16;
FEncoderFlac.CompressionLevel := Compression; // default 6
FEncoderFlac.Filename := FFilename; // file.flac
Res:= FEncoderFLAC.Encoder_Prepare(Channel, false); //
if (Res > 1) then
begin
//Error
Exit;
end;
BASS_ChannelPlay(Channel, true);
Thx.