Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Beep-ер [D6, Win95/98, WinXP]

Sender © (2002-04-29 19:26:00)
Прямо извиняюсь за такой вопрос. Как из дельфи заставить системный динамик играть с нужной частотой нужный промежуток времени? Что-нибудь типа паскалевского Sound?

Andrey007 (2002-04-30 10:54:00) [1]
В принципе ещё есть функция MessageBeep(). Например: MessageBeep(MB_OK).
Надеюсь, Вы не "Подмосковные вечера" выдаёте через динамик :-)

Vovchik (2002-04-30 00:01:00) [2]
> Sender © (29.04.02 23:57)
Я же говорил, что сделал свой компонент на основе TCustomEdit"а, который одинаково не пищал во всех виндах...

Sender (2002-04-29 23:57:00) [3]
Всем огромное спасибо. В Faq действительно хороший пример, только вот никто не подскажет что-нибудь действительно попроще, и чтобы работало в обеих виндах... Не хочется чтобы потом юзвери ругались на то, что всю жизнь прога в 9x шла, а в XP заглючила, и всё только из-за системного динамика...

Anatoly Podgoretsky (2002-04-29 20:31:00) [4]
Да и в FAQ есть хороший пример

Dimka Maslov (2002-04-29 20:16:00) [5]
http://delphibase.endimus.com/?action=viewfunc&topic=mediasound&index=1

Vovchik (2002-04-29 20:00:00) [6]
Под 9х работает ассебмлерный вариант, а под нормалльными системами (NT/2K/XP) - виндовая ф-ция. Какие ещё проблемы?

cok (2002-04-29 19:50:00) [7]
Могу привести пример на Паскале :

sound(2000); delay(1000); nosound;

Song (2002-04-29 19:50:00) [8]
Только ассеблерная вставка, да и то не очень корректно работающая.

Vovchik (2002-04-29 19:37:00) [9]
>Sender © (29.04.02 19:33)
Насколько я знаю, это не работает под 9х.

Sender (2002-04-29 19:33:00) [10]
Хе, сам же отвечаю, даже гупо как-то....

SysUtils.Beep;
Windows.Beep(1000, 1000);

Наверх

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