[InRock]

Делаю онлайн мп3 плеер и хочу сделать эквалайзер.
Посмотрел в примере. Сделал как там написано и ничего не работает.
Двигаю ползунок, но 0 реакций(
помогите решить проблему..

[ryderx34]

Я делал примерно так:

Код:

var
  FileStream: HSTREAM; // handle воспроизводящегося потока
  FX: HFX; // handle добавляемого эффекта

procedure TForm1.TrackBar1Change(Sender: TObject);
var
  PE: BASS_DX8_PARAMEQ;
begin
  BASS_ChannelRemoveFX(FileStream, FX); // чтобы убрать предыдущую настройку
  FX := FBASS_ChannelSetFX(FileStream, BASS_FX_DX8_PARAMEQ, 1);
  PE.fCenter := 80; // частота регулируемой полосы (в герцах, от 80 до 16000)
  PE.fGain := TrackBar1.Position; // задаваемое значение (от -15 до 15)
  BASS_FXSetParameters(FX, @PE);
end;

[GriLab]

Сообщение от ryderx34

Я делал примерно так:

Код:

var
  FileStream: HSTREAM; // handle воспроизводящегося потока
  FX: HFX; // handle добавляемого эффекта

procedure TForm1.TrackBar1Change(Sender: TObject);
var
  PE: BASS_DX8_PARAMEQ;
begin
  BASS_ChannelRemoveFX(FileStream, FX); // чтобы убрать предыдущую настройку
  FX := FBASS_ChannelSetFX(FileStream, BASS_FX_DX8_PARAMEQ, 1);
  PE.fCenter := 80; // частота регулируемой полосы (в герцах, от 80 до 16000)
  PE.fGain := TrackBar1.Position; // задаваемое значение (от -15 до 15)
  BASS_FXSetParameters(FX, @PE);
end;

Спасибо, буду пробовать!