Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Звук 
:(
    Опции темы
Masas
Дата 13.4.2007, 15:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 63
Регистрация: 21.8.2006

Репутация: нет
Всего: нет



Как воспроизводить звуки принажатии на кнопкуб или при выполнении загрузки?
PM MAIL   Вверх
mihanik
Дата 13.4.2007, 15:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 11
Всего: 109



Полное описание в прикреплённом файле.
Читай!!!
Там всё очень понятно и с примерами.

Одно "но".
По-английски...


Присоединённый файл ( Кол-во скачиваний: 9 )
Присоединённый файл  appx_c.rar 658,28 Kb


--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
Masas
Дата 14.4.2007, 12:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 63
Регистрация: 21.8.2006

Репутация: нет
Всего: нет



Меня эт нискока несмущает) спасибо
PM MAIL   Вверх
AndreyK
Дата 17.4.2007, 18:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 102
Регистрация: 15.3.2007

Репутация: нет
Всего: нет



Посмотрел файл... это ,насколько я понял, какой-то элемент управления (музыку слушать).

Если надо просто звук изобразить то можно просто при помощи API:

Обьявить в модуле функции:
Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
        (lpszSoundName As Any, ByVal uFlags As Long) As Long
Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Global Const SND_ASYNC = &H1     ' Play asynchronously
Global Const SND_NODEFAULT = &H2 ' Don't use default sound
Global Const SND_MEMORY = &H4    ' lpszSoundName points to a memory file
Global Const SND_FILENAME = &H20000
Global SoundBuffer() As Byte

И звучать
прямо с диска:
        PlaySound "c:\sound1.wav", 0, SND_ASYNC Or SND_NODEFAULT Or SND_FILENAME

или из ресурса:
        SoundBuffer = LoadResData(16, "WAVE")
        sndPlaySound SoundBuffer(0), SND_ASYNC Or SND_NODEFAULT Or SND_MEMORY


Это сообщение отредактировал(а) AndreyK - 17.4.2007, 18:14
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0416 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.