Подключение URL в BASS.

[victorshkoda]

Доброго времени суток. Пытаюсь радио сделать. Онлайн. Вроде все правильно, на форуме вычитал и по спецификации BASS смотрел, но все равно не работает (ошибка: Not enough actual parameters) :

procedure TForm1.btn1Click(Sender: TObject);
begin

    BASS_Free;
    BASS_Init(-1, 44100, 2, 0, nil);
    BASS_ChannelPlay:= BASS_StreamCreateURL(PAnsiChar('http://217.199.213.168:8000/v1_1'),0,0,nil,0);
    Bass_ChannelPlay(chan,False);

end;

в PHP http://217.199.213.168:8000/v1_1 через javascript прогоняю, все отлично. Просто хотел сделать радио без подключения Апача. Во флеш работает, но глючит регулярно. Говорит, заблокировано соединение. В общем, подскажите в чем проблема. Если кто сталкивался.

[EUGY]

BASS_ChannelPlay:= BASS_StreamCreateURL(...

Если кто сталкивался

Первый раз такое вижу.
Присвоение возвращаемого значения одной функции в имя другой?
Что бы это значило?

[victorshkoda]

Скачал с форума. Жаль не сохранил с какого.

[victorshkoda]

Загоняю BASS_ChannelPlay в переменную, результат то же. На форуме написано, что все работает. Хотя, посмотрев внимательно, Вы правы, возвращаемое значение функции можно использовать как угодно, но как имя другой... Не проще ли сделать все в одной. Хотя, по идее правилам это не противоречит, и по идее все должно работать.

[EUGY]

Ну вот сейчас качнул эту dll, не особо задумываясь, накидал параметры.
Все работает:

function BASS_Init( p1: Integer; p2: Integer; p3: Integer; p4: Integer; p5: Integer) : Boolean; stdcall;  external 'D:\BASS.dll';
function BASS_StreamCreateURL(p1: Pointer; p2: Integer; p3: Integer; p4: Integer; p5: Integer) : Integer; stdcall;  external 'D:\BASS.dll';
function BASS_ChannelPlay(p1: Integer; p2: Integer) : Integer; stdcall;  external 'D:\BASS.dll';

procedure TForm1.Button1Click(Sender: TObject);
var
chan : Integer;
begin
   BASS_Init(1, 44100, 0, 0, 0);
   chan:= BASS_StreamCreateURL(PAnsiChar('http://217.199.213.168:8000/v1_1'),0,0,0,0);
   BASS_ChannelPlay(chan, 0);
end;

[Lesha]

http://jqbook.narod.ru/delphi_bass.html