[casperock]

Решил сделать интернет радио станцию на басс и сокетсервер, но возник ряд проблем, например:

Код:

var
Channel: HStream;


procedure TForm1.ServerSocket1ClientConnect(Sender: TObject;
Socket: TCustomWinSocket);
begin
ServerSocket1.Socket.Connections[0].SendStream(Channel);
end;

Но блин, выбивает ошибку в конце этой строки:

Код:

ServerSocket1.Socket.Connections[0].SendStream(Channel);


[Error] Unit1.pas(103): Incompatible types: 'TStream' and 'Cardinal'

Поток Channel формирует либа bass.dll .

[mirt steelwater]

вот это глянь http://bad-magician.od.ua/index.php?...achijj-telefon
компонент кажется NewAC назывался.. - посмотри в исходники и поймешь - я давно писал