Цитата:
|
Сообщение от HMR
Пробывал через проводник ошибка всеравно.
Вот файлы bass_simple.pas и bass.pas которые у меня.
|
Всё понятно. У тебя какая-то совершенно другая реализация модуля bass_simple.pas. У меня реализация от
alexpac26 которая
>>здесь<<.
Чтобы в той версии которую ты выложил не появлялось никаких сообщений закоментируй MessageBox в модуле bass_simple здесь:
Код:
procedure winmessage(h: HWND; text,caption: string; messtype: integer);
begin
MessageBox(h,PChar(text),PChar(caption),messtype);
end;
Или чтобы конкретно это сообщение не появлялось - закоментируй вызов winmessage вот здесь:
Код:
// запуск завершен
if (stream = 0) then begin
winmessage(Handle,b_mess_error[b_mess_lang,2]+BassErrorString,'Error BASS_StreamCreateFile');
busy:=false; exit;
end;
Ну или же используй bass_simple.pas из ссылки которую я выше привёл - там сообщения об ошибках сделаны через исключения, которые можно подавлять (или обрабатывать) с помощью
try..except.