Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.03;
Скачать: CL | DM;

Вниз

Звук системным динамиком...   Найти похожие ветки 

 
V.Turecky   (2002-07-27 12:16) [0]

Добрый день.

Не подскажите как подать звук системным динамиком? При этом нужно регулировать его частоту и длительность. Плюс работа кода во всех ОСЯХ.


 
V.Turecky   (2002-07-27 12:18) [1]

Или может компонент какой-то посоветуете. Если будете советовать компонент, то обязательно дайте на него ссылку!


 
Win32.hlp   (2002-07-27 13:08) [2]

Beep(bla-bla-bla)


 
Феликс ©   (2002-07-27 16:05) [3]

>Win32.hlp
:))))))))))))))))))))
А вообще
http://www.xatka.vov.ru/sound.htm


 
Anatoly Podgoretsky ©   (2002-07-27 16:28) [4]

Как насчет того, что бы взять из FAQ


 
mukha ©   (2002-07-27 17:13) [5]

Если сильно надо, сообщи мыло. Отправлю как раз то, что тебе надо.В примере показана возможность регулировать частоту и длительность звука системного динамика.


 
VEG ©   (2002-07-28 17:24) [6]

procedure Sound(Frequency, Duration: Integer);//Frequency - частота, Duration - длительность
asm
cmp Win32Platform, VER_PLATFORM_WIN32_NT
jne @@9X
push edx
push eax
call Windows.Beep
ret
@@9X:
push ebx
push edx
mov bx, ax
mov ax, 34DDh
mov dx, 0012h
cmp dx, bx
jnc @@2
div bx
mov bx, ax
in al, 61h
test al, 3
jnz @@1
or al, 3
out 61h, al
mov al, 0B6h
out 43h, al
@@1:
mov al, bl
out 42h, al
mov al, bh
out 42h, al
call Windows.Sleep
in al, 61h
and al, 0FCh
out 61h, al
@@2:
pop ebx
end;



-<>-<>-<>-<>-<<<Фраза>>>-<>-<>-<>-<>-
Зверь, самый лютый, жалости не чужд.
Я чужд. Значит я не зверь.



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

Текущий архив: 2002.10.03;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.017 c
1-8024
kex86
2002-09-20 01:47
2002.10.03
Почему на 9910-ый проход циклом по этому коду система начинает


3-7869
Шурик Ш
2002-09-12 14:52
2002.10.03
Drag&Drop: Источник DBGrid


14-8147
kolobok11
2002-09-09 10:25
2002.10.03
Винты, винты, винты ...


14-8151
MaximatorVeter
2002-09-09 11:43
2002.10.03
Мелочи жизни


8-8067
MJH
2002-06-01 16:44
2002.10.03
MJHF-EQ-DLL version 0.3