Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ помогите, пожалуйста, срочно

Автор: Capitan Nemo 31.05.2007 20:22

я сделал уже вывод клавиатуры синтезатора на экран.
не могу сделать, чтоб пока клавиша нажата - воспроизводился звук... как это сделать, подскажите, плз
2) нужно организовать запись и воспроизведение записанно мелодии... вот тут вообще тупик... помогите. пожалуйста... как считать длительность нажатия клавиши, длительность паузы между нажатиями и как это все записать?

ЗАВТРА СДАВАТЬ КУРСОВИК, ГОРЮ!

Автор: Ozzя 31.05.2007 20:26

http://sources.ru/sound/organ.htm
http://sources.ru/sound/mused.htm
http://sources.ru/sound/pcspro2.htm
http://sources.ru/sound/melody25.htm

Автор: Capitan Nemo 31.05.2007 20:31

не открывается ни одна ссылка(((

Автор: Ozzя 31.05.2007 20:34

http://www.sources.ru/pascal/sound/organ.htm
А так?

Автор: Capitan Nemo 31.05.2007 20:35

благодарю =)

Добавлено через 7 мин.
уфффф...
крайне сложно разобраться в готовых исходниках...
уделите, пожалуйста, кто-нибудь чуточку времени. помогите мне с конкретными вопросами...

Прошу прощения, но ап...
очень нужна помощь....

Автор: Ozzя 31.05.2007 21:09

И где же розы? rolleyes.gif
То бишь вопросы?

Автор: Capitan Nemo 31.05.2007 21:12

ну так в самом первом сообщении

1) как организовать. чтобы пока клавиша нажата - воспроизводился звук... а по отпусканию клавиши звук прекращался
2) как организовать запись сыгранной мелодии в файл? хотя бы просто как считать длительность нажатия клавиши и длительность паузы?

Автор: Ozzя 31.05.2007 21:20

http://www.sources.ru/pascal/keyboard/keystuff.htm

Автор: Capitan Nemo 31.05.2007 21:37

слишком сложно(((
мне совсем просто надо
почему. например, вот так не работает

c:=readkey;
if c=#113 then
while keypressed=true do
sound (200);




как зафиксировать факт нажатия клавиши, запустить sound, затем зафиксировать факт отпускания клавиши, запустить no_sound?

Автор: Ozzя 31.05.2007 21:40

Только так, как по ссылке. Всё равно надо свой обработчик клавиатуры писать.

Добавлено через 1 мин.
http://pascal.sources.ru/keyboard/vituskbd.htm