Bass Klasse -> Kleiner Fehler

[turboPASCAL]

Delphi-Quellcode:

procedure TMyBass.SetCrossfader(const Value: Byte);
var Left1,Right1:Integer;
begin
        left1  := 100 - value ;                        // <-
        Right1 := 100 - left1 ;                        // <-

        A.volume := round( (Left1  * A.volume) / 100); // <-
        B.volume := round( (Right1 * B.volume) / 100); // <-

        _Crossfader := Value;
end;

Schon mal durchgerechnet und dabei die Values der beiden Lautstärkeregler angeguckt ?