Имя: Пароль:
1C
1С v8
А есть какой нить аналог "Сигнал()" или как его задать?
,
0 BigShmax
 
13.07.11
18:13
Нужно выдавать сигнал по событию
В СП нашел только  Сигнал();

впринципе работает но нужен другой сигнал

но не понял фразу из СП (точнее понял но не могу применить):

Устройство, воспроизводящее звук, а также характер звукового сигнала зависят от программно-аппаратного состава компьютера и звуковых установок ОС.

интересуют какие  установки ОС влияют  точнее где там выбрать  другой звук  либо  другой метод издания звука.
1 Господин ПЖ
 
13.07.11
18:19
ну в винде настройки есть "Звуки"
2 Господин ПЖ
 
13.07.11
18:20
1с дергает какое-то событие винды, она (винда) сигнал и подает
3 H A D G E H O G s
 
13.07.11
18:37
Экспортная функция MessageBeep() модуля user32.dll
4 BigShmax
 
14.07.11
12:29
(1) (2)
вот и хотелось бы найти того кто знает что это за событие.

(3)  а где почитать что это и с чем его едят?
5 Ork
 
14.07.11
12:33
В семерке делал так :

Процедура Подудеть(реж)
   Перем ИмяФайла;
   Если ИспользоватьЗвуки=1 Тогда
       Если реж=1 Тогда
           ИмяФайла="D:\Базы1С\Звуки\Зв1.wav";
       ИначеЕсли реж=2 Тогда
           ИмяФайла="D:\Базы1С\Звуки\Зв2.wav";
       ИначеЕсли реж=3 Тогда
           ИмяФайла="D:\Базы1С\Звуки\Зв3.wav";
       КонецЕсли;
       Проигрыватель.FileName=ИмяФайла;
       Проигрыватель.Command = "Open";
       Проигрыватель.Command="SOUND";
   КонецЕсли;
КонецПроцедуры


ИспользоватьЗвуки=1;
Попытка
   Проигрыватель=CreateObject("MCI.MMControl");
   Проигрыватель.DeviceType = "WaveAudio";
   Проигрыватель.Wait=0;
Исключение
   ИспользоватьЗвуки=0;
КонецПопытки;
6 kosmo
 
14.07.11
12:34
Устройство, воспроизводящее звук, а также характер звукового сигнала зависят от программно-аппаратного состава компьютера и звуковых установок ОС.

по-моему это зависит от того есть ли на материнской плате внутренний динамик. не на всех он есть, и бывает что не подключен (но это на старых материнских платах было). хотя вроде на новых материнских платах он встроенный.
7 BigShmax
 
14.07.11
13:45
(6)  нет   у меня сейчас  по

Сигнал();

звук издает на звуковую карту  короткий виндовый.  вижу два метода  по звуку найти что за виндовое событие отрабатывает и повесить туда что нибудь свое то что надо, либо дождаться от сообщества  альтернативы :-)
8 BigShmax
 
14.07.11
14:37
неполучется
Проигрыватель=CreateObject("MCI.MMControl");
видать какую то библиотеку надо подцепить   а то ругается

{Форма.Форма.Форма(20,17)}: Процедура или функция с указанным именем не определена (CreateObject)
       Проигрыватель=<<?>>CreateObject("MCI.MMControl"); (Проверка: Толстый клиент (обычное приложение))
9 Нуф-Нуф
 
14.07.11
14:38
Батенькая хочет 8битное вивальди?
10 BigShmax
 
14.07.11
14:43
(9)  по сути мне достаточно понять что за виндовое событие отвечает на Сигнал()  остальное  так  - изврат :-)
11 ДенисЧ
 
14.07.11
14:44
(10) cv (3)
12 Tatitutu
 
14.07.11
14:46
13 BigShmax
 
14.07.11
14:55
короче это виндовый звук "Восклицание" мне этого хватит собственно :-)
14 BigShmax
 
14.07.11
14:56
(12)  спасиб - ща гляну
15 le_
 
14.07.11
14:59
SP = Новый COMОбъект("SAPI.SpVoice");
SP.Speak("Pip! Pip! Pip!");
16 BigShmax
 
14.07.11
15:03
(12)   шикарная ссыла :-)  спасиб еще раз
17 BigShmax
 
14.07.11
15:05
(15)   офигеть :-))))))))))
18 le_
 
14.07.11
15:30
FilePath = "C:\WINDOWS\Media\chimes.wav";
Pl = Новый ComОбъект("WMPlayer.OCX");
Pl.settings.autoStart = Ложь;
Pl.settings.enableErrorDialogs = Ложь;
Pl.Settings.Volume = 100;
Pl.URL = FilePath;
Pl.controls.Play();
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший