[valvl63]

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

Инициализация библиотеки происходит раньше чем событие OnCreate. Можно попытаться прописать нужный код в секцию implementation. В поставке bass также имеется pas-файл для динамической загрузки библиотеки.

Согласен.
Потому, как с basswma.dll кодик работает

Код:

procedure TForm1.FormCreate(Sender: TObject);
 var
  basspath: String;
begin

   basspath:=IncludeTrailingPathDelimiter(ExtractFilePath  (Application.ExeName));
    basspath:=basspath+'plugin\basswma.dll';
     LoadLibrary(PChar(basspath));
      Bass_PluginLoad('basswma.dll', 0);

    if bass_init(-1, 44100,0, handle,nil)=false then
    showmessage('Не могу инициализировать поток');
end;

Админ: Пользуемся тегами для оформления кода!