Вниз
Скачать: CL | DM;

Звук по локалке   Найти похожие ветки 

 
Cure   (2003-12-04 23:11) [0]

Господа программеры, не подскажите ли как можно послать звук по локальной сети? Заранее спасибо.


 
NikeOLD   (2003-12-04 23:16) [1]

Какова задача?
Если у тебя что-то типа клиент-сервер на сокетах, то отсылай свой звуковой файл на другую сторону, там его сохраняй на диск и давай команду на проигрывание.


 
Cure   (2003-12-05 00:26) [2]

Сорри, что не уточнил сразу - дело происходит в риалтайме, то есть я говорю в микрофон, а меня слышат на другом конце провода :-).


 
NikeOLD   (2003-12-05 12:08) [3]

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


 
}|{yk ©   (2003-12-05 12:25) [4]

Протокол udp существует для передачи потоковых данных. Типа открываешь порти начинаешь вещать :)). А на клиенте стоит прога, которая слушает нужный порт. Да таких серверов потокового аудио/видео полно, незачем огород городить. А можно просто NetMeteng соединиться и говорить


 
savva ©   (2003-12-05 12:40) [5]

на вопрос "как .." можно ответить по разному..
например
1) сделать все самому (записать<-->передать<-->проиграть)
2) попытаться поискать http://delphimaster.ru/cgi-bin/forum.pl?n=4&search=%E7%E2%F3%EA
3) взять готовое http://delphimaster.net/view/6-1068924873/


 
Cure   (2003-12-14 01:42) [6]

А можно ли как-то улучшить звук этого компонента (distro), а то качество уж больно низкое... :-(


 
savva ©   (2003-12-15 09:39) [7]

в исходниках файла telefon.pas корерктируй процедуру procedure Ttelefoon.start;
а имеено строки
with origformat^ do
begin
wformattag := 4353; //efficient l& h 4.8 1kb
nchannels := 1;
nsamplespersec := 8000 ;
navgbytespersec := 600;
nblockalign := 12;
wbitspersample := 16;
cbsize := 0;
f.format := origformat^
end;

чем больше выделенное число - тем лучше звук, но и при этом размер передаваемых данных в единицу времени возрастает...


 
Cure   (2003-12-20 00:00) [8]

посмотрел я исходники и подумал - а проще это никак низя сделать?


 
savva ©   (2003-12-20 09:41) [9]

Удалено модератором
Примечание: Оффтоп...



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.021 c
14-80096
MPS
2004-02-03 10:55
2004.02.25
Чайнические вопросы по Линуксу


1-79877
Leech
2004-02-10 12:03
2004.02.25
нужна структура наподобие массивов....


1-79827
first_aid
2004-02-11 09:22
2004.02.25
TListView, OnCusnomDrawSubItem, границы области рисования?


9-79529
Jenaxx
2003-08-09 12:19
2004.02.25
Я скачал из Samples исходник Quest это типа рпг какой то а она...


3-79673
BanderLog
2004-01-30 11:42
2004.02.25
Перевод Даты в Строку




   Наверх