Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Kak mozhno v Delphi narisovat' zvuk iz mikrofona? [D7, WinXP]


NEEDHelp ©   (2004-06-18 14:26:00) 

Zdravstvujte.
Mne nado sdelat' programku kotoraja budet risovat' zvuk iz mikrofona. A vot kak zastavit' programku ego risoat'? <-- vot eto voprosss! neznaju kak ego reshit' :(
Zaranee blogadarna tomu kto pomozht :D


Alwin   (2004-07-07 00:38:00) [1]

PVOzerski скинте и мне пожалуйста. Если влом, то кинте ссылочку. Заранее благодарен. olexander@inbox.ru


NEEDHelp   (2004-06-18 16:13:00) [2]

u menja kompik visnit kogda ja kompiliruju osc v Delphi :((((((


PVOzerski   (2004-06-18 16:03:00) [3]

>etot fail
Который? Там, по сути, 2 проекта - osc (для Delphi) и Sndrec (для FreePascal). А бинарник-то заработал?


NEEDHelp   (2004-06-18 15:53:00) [4]

PVOrzhevski :((( eh.... nekompiliruet moj Delphik etot fail i ni4e nepolu4aetsja. NEVEZET mne :((((((((


PVOzerski   (2004-06-18 15:43:00) [5]

>tak ne risuet :((( pustoe okno pokazivaet :((<--tam 4toto neto. No tak i tak BIG THANKS :))
Даже если нажать "Start" и ввести имя файла? Правда, прога в таком виде использует 1-е вводное устройство, и если это не та карта, в к-рую вставлен микрофон, то ничего не запишется.


NEEDHelp   (2004-06-18 15:35:00) [6]

PVOrzhevki, tak ne risuet :((( pustoe okno pokazivaet :((<--tam 4toto neto. No tak i tak BIG THANKS :))
Lena19, a vi nemoglibi sbrosit' mne na chris-m@yandex.ru vashu programku? Budu blagodarna :)


lena19   (2004-06-18 15:24:00) [7]

напиши адрес вышлю пример тока там придется разбиратся.


PVOzerski   (2004-06-18 15:24:00) [8]

Отправил уже :^)


NEEDHepl   (2004-06-18 15:10:00) [9]

Nu vot. :( PVOzerski vi propali :(((((
Ktonibud', POMOGITE, ja sama ne spravljus' :((


NEEDHelp   (2004-06-18 14:45:00) [10]

PVOzerski :D
O4en' nado :))
BUDU ZHUTKO BLAGODARNA!
:)))) Poshlite pozhalujsta na chris-m@yandex.ru


PVOzerski   (2004-06-18 14:36:00) [11]

Ну, так несжатые форматы вроде wav - это цепочки byte или smallint, отражающие амплитуду сигнала через стандартный промежуток времени. Так что, с поправкой на уместные коэффициенты, по X берем смещение,  по Y - амплитуду. Если мы вводим звук низкоуровневым API (wavein***), при обработке MM_WIM_DATA мы получаем блоки аналогичной структуры. Единственное: надо успевать обрабатывать блок обрабатывать до получения следующего. В принципе, у меня написана рабочая прога (FreePascal+Delphi6), хотя, видимо, и не эталон по коду. Но если очень надо, могу поделиться.


Наверх

Титульная страница Поиск, карта сайта Написать письмо