DELPHI 

народ помогите использую библиотеку bass при добавленийц файлов в список там проигрывается один и тот же файл чтоо делать?

WOLF3848 писал :народ помогите использую библиотеку bass при добавленийц файлов в список там проигрывается один и тот же файл чтоо делать?

библиотека с исходниками идет?
если да, то дебаггер в руки взять не судьба?
она большая? :)
выложи свой проект + эту библиотеку... хотя нет :) я не помогу - некогда :(
у самого программа "зависла", т.к. не успеваю :(

WOLF3848 писал :народ помогите использую библиотеку bass при добавленийц файлов в список там проигрывается один и тот же файл чтоо делать?

Когда проиграет один, подсунуть другой файл.
Вообще не могу понять твоих проблем.

Вот смотрите мне надо когда я нажал на кнопку "открыть" я выбрал файлы после когда я перехожу по плай-листу у меня играет один и тот же файл а надо чтоб РАЗНЫЕ играли!
вот код при открывание:

procedure TfrmMain.SpeedButton4Click(Sender: TObject);
var dir :string;
begin
if dlgOpen.Execute then
ListBox1.Items.Add(ExtractFileName(dlgopen.FileName));
begin
FFileName:= dlgOpen.FileName;
BASS_PlaySoundFile(ffilename);
end;
и
когда я кликаю по плай-листу в чём проблема?
procedure TfrmMain.ListBox1Click(Sender: TObject);
begin
BASS_PlaySoundFile(ffilename);
end;

А где у тебя переменная ffilename меняется то?

Может вот так всётаки:

Код:

procedure TfrmMain.ListBox1Click(Sender: TObject); begin    if (ListBox1.ItemIndex>=0) then    begin       ffilename:=ListBox1.Items.Strings[ListBox1.ItemIndex];       BASS_PlaySoundFile(ffilename);    end; end;

Большое спасбо всё работает и эквалайзер и добвления и визуальные ефекты даже осталось всё красиво сделать!

ну типерь винамп захлебнётся от зависти

Вообщем ещё одна проблема вот если я прогу запущу и открою добавлю в плай-лист то всё нормально работает но а когда я жму на музыкальный файлик и открыть с помощью моей проги выдаётся отшибка и сразу не запускается в чём проблема?

когда ты делаешь "Открыть с помощью.." то запускается программа с именем файла в качестве параметра, например файл 1.txt открыть с помощью блокнота:

Код:

start notedad.exe 1.txt или start c:\windows\notepad.exe "d:\my files\1.txt" "d:\2.txt"

тебе при старте программы нужно проверять командную строку на наличие параметров, к примеру так (в обработчике onCreate):

Код:

var i: integer; ... begin    if ParamCount>1 then   begin      ListBox1.Items.Clear; // Очищаем плейлист      for i:=1 to ParamCount-1 do // добавляем файлы в плейлист      ListBox1.Items.Add(ParamStr(i));         end;   ... end;

ParamStr(0) - имя твоей программы с полным путем
ParamStr(1) - первый параметр и т.д.
ParamCount - количество параметров

не получилось ошибку не пишет а файлы не добавляет плей-лист пуст может чё ни так написал?

ну вот я всё сделать как ты написал я жму на музыкальный файл-открыть с помощью-свое проги она запускается но музыкального файла там нет чё делать то?

его даже и в списке нету!

Ошибка в 18-ой строке.

не понял?

nayk ни чё не получилось не добавляет он файл если через открыть с помощь!Он и ошибку не пишет но файлы не добавляет!народ ну ПОМОГИТЕ!