|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
27.01.2008, 22:57 | #1 |
Форумчанин
Регистрация: 25.12.2007
Сообщений: 655
|
Непонял с динамиком
Нужно что бы при нажатии на Button срабатывал встроенный
динамик PC Speaker,я уже задавал такой вопрос , ответили функция Beep,но не могу разобраться куда ее написать,если можно поподробнее или рабочий исходничок
За частые поиски был забанен во всех известных
поисковых системах! |
27.01.2008, 23:05 | #2 |
Участник клуба
Регистрация: 28.11.2007
Сообщений: 1,521
|
procedure TForm1.Button1Click(Sender: TObject);
begin Windows.Beep(900,300); end; где 900 это частота с которой будет пищать системный динамик, а 300 это время которое он будет пищать.=) Всё просто.
Всегда рад помочь!
|
27.01.2008, 23:13 | #3 |
Пользователь
Регистрация: 31.10.2007
Сообщений: 62
|
Прикольная вещь, можно сделать несколько записей и мелодию какую нить состряпать.
У знакомого была подобная, что она на каждый час играла Гимн России старый |
27.01.2008, 23:20 | #4 |
Реанимируюсь...
Участник клуба
Регистрация: 19.07.2007
Сообщений: 1,445
|
Так в той теме и нужно было спрашивать, хотя там дан аналогичный ответ, осталось только пошевелить мозгом.
Кросс постинг не приветствуется и Михаил Юрьевич должен был это заметить. Почитайте какую-нибудь книгу по дельфям, будет очень кстати. Для того, что бы что-то было впрок, нужно хоть немного самостоятельных действий.
Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живёте.
Правила форума => Правила раздела => Для общего развития => Помощь студентам => Перед тем, как создавать тему, скачайте себе... P.S.: форум не песочница (с)
название статьи на сайте MS: "Отмена принудительного отключения автоматического запуска в реестре Windows" |
27.01.2008, 23:26 | #5 |
Участник клуба
Регистрация: 23.07.2007
Сообщений: 1,054
|
А это Windows.Beep(900,300); хорохая вешь.
А я долго думал как воспроизвести звук через системный динамик! Мне давали невероятнейшие коды на асемблере. а тут просто бип и все
Писано по д'Эльфийски
Последний раз редактировалось Лубышев; 27.01.2008 в 23:29. |
28.01.2008, 08:33 | #6 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Ответ на вопрос дан полностью и исчерпывающе.
Тему закрываю, тем более что такая уже была
I'm learning to live...
|