Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2004.10.03;
Скачать: [xml.tar.bz2];

Вниз

Kak mozhno v Delphi narisovat zvuk iz mikrofona?   Найти похожие ветки 

 
NEEDHelp   (2004-06-18 14:26) [0]

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


 
PVOzerski ©   (2004-06-18 14:36) [1]

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


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

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


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

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


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

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


 
PVOzerski ©   (2004-06-18 15:24) [5]

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


 
NEEDHelp   (2004-06-18 15:35) [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 :)


 
PVOzerski ©   (2004-06-18 15:43) [7]

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


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

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


 
PVOzerski ©   (2004-06-18 16:03) [9]

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


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

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


 
Alwin ©   (2004-07-07 00:38) [11]

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



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

Форум: "Media";
Текущий архив: 2004.10.03;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.042 c
1-1095309628
avch
2004-09-16 08:40
2004.10.03
Работа с Excel через Variant


4-1093528246
RagE
2004-08-26 17:50
2004.10.03
ALT+key


14-1095300236
Думкин
2004-09-16 06:03
2004.10.03
С днем рождения! 16 сентября


4-1093237731
Станислав
2004-08-23 09:08
2004.10.03
sendkeys


3-1094361702
Гаврилов В.А.
2004-09-05 09:21
2004.10.03
Работа с Microsoft Access





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский