procedure _dproc(buffer: Pointer; len: DWORD; user: Pointer); stdcall;
begin
  if (buffer <> nil) and (len = 0) then 
   _hi_onEvent(THIBASS_StreamCreateURL(user)._event_onStatus, string(pchar(buffer)));
end;