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

Вниз

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 вся ветка

Форум: "Основная";
Текущий архив: 2002.05.16;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.005 c
6-50059
BlackLord
2002-03-02 16:41
2002.05.16
Подключение через Socket по WinApi помогите!!!!!


4-50161
Vlad_NOJB
2002-03-14 19:38
2002.05.16
Как определить virtual-key code?


3-49874
Вероника
2002-04-19 15:34
2002.05.16
Поле типа Date.


3-49896
rvs
2002-04-22 08:21
2002.05.16
BatchMove - batCopy


14-50110
VID
2002-03-27 19:45
2002.05.16
Голосование о ПИВЕ





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский