|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
21.07.2009, 00:33
|
#1 |
|
Пользователь
Регистрация: 17.07.2009
Сообщений: 14
|
Открытие Form2 с сопровождением звука
Помогите Как прописать чтоб при открытие Form2 было сопровождение звука. Ну для примера звук критической ошибки Windows.. Напишите пример очень прошу... заранее посибо...
|
|
|
|
21.07.2009, 00:44
|
#2 | |
|
Форумчанин
Регистрация: 22.02.2009
Сообщений: 875
|
Попробуйте две эти процедуры:
Код:
Цитата:
Если надо любой звук, то можете использовать PlaySound из модуля mmsystem.
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
|
|
|
|
|
|
21.07.2009, 00:44
|
#3 |
|
Software Developer
Старожил
Регистрация: 19.12.2008
Сообщений: 2,070
|
Вот так можно:
Код:
Ну тогда только добавлю =) значения для функции MessageBeep MB_ICONASTERISK - проигрывает звук "Звездочка" (SystemAsterisk) MB_ICONEXCLAMATION - проигрывает звук "Восклицание" (SystemExclamation) MB_ICONHAND - проигрывает звук "Критическая ошибка" (SystemHand) MB_ICONQUESTION - проигрывает звук "Вопрос" (SystemQuestion) MB_OK - проигрывает звук "Стандартный звук" (SystemDefault)
Будь проще и люди к тебе потянутся
Последний раз редактировалось spamer; 21.07.2009 в 00:46. |
|
|
|
|
21.07.2009, 11:25
|
#4 |
|
Пользователь
Регистрация: 17.07.2009
Сообщений: 14
|
Благодарю все кто мне помог)))))
|
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| CppWEbBrowser. Запрет на открытие нового окна, и открытие его в том же окне | Askar_g | Общие вопросы C/C++ | 4 | 25.06.2011 20:00 |
| как скопировать form2? | blackstersl | Общие вопросы Delphi | 7 | 12.06.2009 13:22 |
| Открытие Form2 в событии FormCreate Form1 | Shouldercannon | Общие вопросы Delphi | 3 | 22.04.2009 18:09 |
| form1 и form2 | SLIMMUS | Общие вопросы Delphi | 3 | 29.10.2008 01:15 |
| then Form2.Show; | beegl | Общие вопросы Delphi | 24 | 24.07.2008 09:53 |
