[Artem_]

Спасибо большое !!!

[Lekas]

Хех... скопировать мало...
Значит так, самое простое:
Копируешь файлы Bass.dll и Bass.pas в диррекдорию с проектом. Затем, в delphi открываешь 'Project\View Source', там надо прописать библиотеку:

Код:

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Bass in 'Bass.dll';

В Unit1 после Uses пишешь Bass.

Посде этого шаманства кидаем на форму 2-е кнопки и в 1-й пишем:

Код:

 If BASS_ChannelIsActive(Channel) <> BASS_ACTIVE_PLAYING then
 Begin
//Play и Stop;
     BASS_Init(-1, 44100, 0, Application.Handle, nil);
    Channel := BASS_StreamCreateFile(FALSE, PChar('test.mp3'), 0, 0,0);
     BASS_ChannelPlay(Channel, True);
     Timer1.Enabled:=true;
 End else
 Bass.BASS_ChannelStop(Channel)

А во второй кнопке пишем:

Код:

//Пауза;
 If BASS_ChannelIsActive(Channel) <> BASS_ACTIVE_PLAYING then BASS_ChannelPlay(Channel, False) else
 BASS_ChannelPause(Channel)

в свойстве OnClose пиши Bass_free;

Вот собственно и всё!
Для изменения громкости самого трека надо на форму кинуть TrackBar и в нём написать так:

Код:

Bass.BASS_ChannelsetAttribute(Channel,BASS_ATTRIB_VOL,TrackBar1.Position/100);

При этом в свойство трак бара Max болжно равняться 100...
Это не изменяет системную громкость...
Удачи в пользовании!