Скачать: CL | DM;

Beep-ер   Найти похожие ветки 

← →
Sender ©   (2002-04-29 19:26) [0]

Прямо извиняюсь за такой вопрос. Как из дельфи заставить системный динамик играть с нужной частотой нужный промежуток времени? Что-нибудь типа паскалевского Sound?

---

← →
Sender ©   (2002-04-29 19:33) [1]

Хе, сам же отвечаю, даже гупо как-то....

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

---

← →
Vovchik ©   (2002-04-29 19:37) [2]

>Sender © (29.04.02 19:33)
Насколько я знаю, это не работает под 9х.

---

← →
cok ©   (2002-04-29 19:50) [3]

Могу привести пример на Паскале :

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

---

← →
Song ©   (2002-04-29 19:50) [4]

Только ассеблерная вставка, да и то не очень корректно работающая.

---

← →
Vovchik ©   (2002-04-29 20:00) [5]

Под 9х работает ассебмлерный вариант, а под нормалльными системами (NT/2K/XP) - виндовая ф-ция. Какие ещё проблемы?

---

← →
Dimka Maslov ©   (2002-04-29 20:16) [6]

http://delphibase.endimus.com/?action=viewfunc&topic=mediasound&index=1

---

← →
Anatoly Podgoretsky ©   (2002-04-29 20:31) [7]

Да и в FAQ есть хороший пример

---

← →
Sender ©   (2002-04-29 23:57) [8]

Всем огромное спасибо. В Faq действительно хороший пример, только вот никто не подскажет что-нибудь действительно попроще, и чтобы работало в обеих виндах... Не хочется чтобы потом юзвери ругались на то, что всю жизнь прога в 9x шла, а в XP заглючила, и всё только из-за системного динамика...

---

← →
Vovchik ©   (2002-04-30 00:01) [9]

> Sender © (29.04.02 23:57)
Я же говорил, что сделал свой компонент на основе TCustomEdit"а, который одинаково не пищал во всех виндах...

---

← →
Andrey007   (2002-04-30 10:54) [10]

В принципе ещё есть функция MessageBeep(). Например: MessageBeep(MB_OK).
Надеюсь, Вы не "Подмосковные вечера" выдаёте через динамик :-)

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.008 c