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

а чего он пищит?   Найти похожие ветки 

← →
tippa ©   (2010-03-29 08:50) [0]

включаю-выключаю системный динамик, на форме 3 кнопки
procedure TForm1.Button3Click(Sender: TObject);
begin
windows.Beep(1000,1000);//проверка
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
SyStemParametersInfo(SPI_SETBEEP,0,nil,SPIF_UPDATEINIFILE);//выключить
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
SyStemParametersInfo(SPI_SETBEEP,1,nil,SPIF_UPDATEINIFILE);//включить
end;
вроде работает, так как системные пикалки отключаются-включаются, а  вот своя пикалка (beep) пищит в любом случае, почему так?

---

← →
oldman ©   (2010-03-29 08:58) [1]

Видимо windows.beep глубоко по барабану твои потуги...

---

← →
12 ©   (2010-03-29 11:27) [2]

тоже была такая ерунда - не нашел почему и как
отрезал провода :)

---

← →
brother ©   (2010-03-29 11:41) [3]

> отрезал провода :)

особенно круто, когда спикер впаян в мамку ;)

---

← →
brother ©   (2010-03-29 11:43) [4]

конечно не в, а на мамку)

---

← →
oldman ©   (2010-03-29 12:02) [5]

> brother ©   (29.03.10 11:41) [3]
> особенно круто, когда спикер впаян


вырывается пассатижами :)))

---

← →
brother ©   (2010-03-29 12:03) [6]

> вырывается пассатижами :)))

ога! вместе с дорожками))))

---

← →
oldman ©   (2010-03-29 12:14) [7]

> brother ©   (29.03.10 12:03) [6]


Ну... Ответкой расковырять, сверлом рассверлить, вывести из строя одним словом.
:)

---

← →
brother ©   (2010-03-29 12:16) [8]

собственно, приходим опять к физическому уровню отключения )))

---

← →
Омлет ©   (2010-03-29 12:38) [9]

Выпаять легко.

---

← →
oldman ©   (2010-03-29 12:40) [10]

Хороший ответ на вопрос "как отключить спикер" - "вырвать/выпаять".
:)

---

← →
brother ©   (2010-03-29 12:40) [11]

> Хороший ответ на вопрос "как отключить спикер" - "вырвать/выпаять".


> а чего он пищит?

))))))))))))

---

← →
QAZ   (2010-03-29 14:10) [12]

> вроде работает, так как системные пикалки отключаются-включаются,
>  а  вот своя пикалка (beep) пищит в любом случае, почему
> так?

потому что имено для отключения системных пиков SPI_SETBEEP и задуман

---

← →
12 ©   (2010-03-29 15:59) [13]

подумалось, как вариант, поправить kernel32 name "Beep";

---

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

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



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