Equalizer mit Bass will nicht..

[BullsEye]

Sry, ich hab gerade nicht die Zeit mich da wieder so ganz reinzuarbeiten, aber vllt hilft dir das ja ein wenig weiter:

Delphi-Quellcode:

  if chkbEqualizer.Checked then
    frmBullPlayerMain.BassPlayer1.UpdateEQ(
        -1 * Trackbar1.Position,
        -1 * Trackbar2.Position,
        -1 * Trackbar3.Position,
        -1 * Trackbar4.Position,
        -1 * Trackbar5.Position,
        -1 * Trackbar6.Position,
        -1 * Trackbar7.Position,
        -1 * Trackbar8.Position,
        -1 * Trackbar9.Position,
        -1 * Trackbar10.Position);
  if not ComboEQ then
  begin
    Equalizer[cmbEQ.ItemIndex].Name := cmbEQ.Text;
    Equalizer[cmbEQ.ItemIndex].T1 := Trackbar1.Position;
    Equalizer[cmbEQ.ItemIndex].T2 := Trackbar2.Position;
    Equalizer[cmbEQ.ItemIndex].T3 := Trackbar3.Position;
    Equalizer[cmbEQ.ItemIndex].T4 := Trackbar4.Position;
    Equalizer[cmbEQ.ItemIndex].T5 := Trackbar5.Position;
    Equalizer[cmbEQ.ItemIndex].T6 := Trackbar6.Position;
    Equalizer[cmbEQ.ItemIndex].T7 := Trackbar7.Position;
    Equalizer[cmbEQ.ItemIndex].T8 := Trackbar8.Position;
    Equalizer[cmbEQ.ItemIndex].T9 := Trackbar9.Position;
    Equalizer[cmbEQ.ItemIndex].T10 := Trackbar10.Position;
  end;