Конференция "Media" » Звуковой чат
 
  • Vova1995 © (03.08.09 08:51) [0]
    Делаю голосовой чат и походу понял, что нужно решить крупных 3 задачи:
    1. Снятие звука с микрофона.
    2. Отправка/прием "звука" по сети/инету.
    3. Воспроизведение принятого звука.
    Для решения первой задачи использовал http://forum.sources.ru/index.php?showtopic=14191 Вроде получилось... Насколько я понял в месте вывода звукового графика (
    with PaintBox1.Canvas do begin
      Brush.Color := clWhite;
      FillRect(ClipRect);
      Polyline(Slice(p^, BufSize));
    end;


    )
    Slice(p^, BufSize) является "звуком снятым с микрофона". Если это так то передать и принять уж как-нибудь смогу (через UDP). А вот как это воспроизвести??? Помогитекодом или примером, а то со звуком в делфи первый раз...
  • Сергей М. © (03.08.09 10:41) [1]

    > является "звуком снятым с микрофона"


    Неверно.

    В данном примере осуществляется запись с микшера.

    А вот какой конкретно источник записываемого сигнала выбран в дан.момент микшером (либо Mic, либо Line-In, либо MixedOut, либо прочий из списка доступных) - это в примере отсутствует напрочь.


    > как это воспроизвести?


    Зачем лезть в дебри WinAPI, если для этого есть готовые компоненты ?

    Например, http://www.torry.net/authorsmore.php?id=2148
  • Vova1995 © (03.08.09 12:29) [2]
    Да конечно не плохо.. но я делаю программу не для себя, а на конкурс (это кусок большой программы) и на некоторых конкурсах к сторонним компонентам относятся плохо..
  • Сергей М. © (03.08.09 12:37) [3]
    Так ведь ничто же не мешает посмотреть как это сделано в компоненте и перенести оттуда нужные фрагменты кода в свою программу)
  • Vova1995 © (03.08.09 13:23) [4]
    Сначала тоже так думал, но после того как начал смотреть исходники понял, что мешает польное не понимание сложного (для меня) текста..
  • Сергей М. © (03.08.09 16:59) [5]
    Тогда почему ты здесь, а не в "Начинающим" ?
  • brother © (04.08.09 04:13) [6]
    судя по
    > Делаю голосовой чат и походу понял, что нужно решить крупных
    > 3 задачи:
    > 1. Снятие звука с микрофона.
    > 2. Отправка/прием "звука" по сети/инету.
    > 3. Воспроизведение принятого звука.
    > Для решения первой задачи использовал http://forum.sources.ru/index.php?
    > showtopic=14191 Вроде получилось... Насколько я понял в
    > месте вывода звукового графика (
    > with PaintBox1.Canvas do begin
    >  Brush.Color := clWhite;
    >  FillRect(ClipRect);
    >  Polyline(Slice(p^, BufSize));
    > end
    ;
    > )
    > Slice(p^, BufSize) является "звуком снятым с микрофона".
    > Если это так то передать и принять уж как-нибудь смогу (через
    > UDP). А вот как это воспроизвести??? Помогитекодом или примером,
    > а то со звуком в делфи первый раз...

    ему в самые начинающие...
  • Ghost (27.05.10 23:27) [7]

    > ему в самые начинающие...


    В начинающие??
    Здесь что элита программистов?? Вместо того чтоб осуждать кого-то взялиб  и помогли челу (скинули рабочие исходники), не бойсь сами аматоры!!
  • Eraser © (31.05.10 04:16) [8]
    > (скинули рабочие исходники),

    и ключи от квартиры, где деньги лежат.
  • Плохиш © (01.06.10 23:24) [9]

    > Ghost   (27.05.10 23:27) [7]
    > Вместо того чтоб осуждать кого-то взялиб  и помогли челу

    Т.к. челу ты не помог, то иди-ка ты в долгое эротическое путешествие.
  • Шахин (10.02.11 10:11) [10]
    У меня есть нормальный исходник по голосавому чату каму надо я могу выложыть!
  • Шахин (10.02.11 10:11) [11]
    У меня есть нормальный исходник по голосавому чату каму надо я могу выложыть!
  • brother © (10.02.11 10:13) [12]
    конкурс выиграл? ;)
  • Сергей М. © (10.02.11 21:25) [13]
    > голосавому

    Где ж ты был, родной, полтора-то года ?)

    > выложыть

    Выкладывают вообще-то хряков.
  • qqga (11.06.11 00:25) [14]
    ну где исходники
  • maxistent © (26.06.11 11:46) [15]
    да, кстати, где же они? =))))))))
  • babanyukv (08.11.13 01:37) [16]
    Задумка хорошая.
    _________________
    http://www.jetlev-flyer.com.ru/
 
Конференция "Media" » Звуковой чат
Есть новые Нет новых   [118573   +13][b:0][p:0.001]