powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / i need help!!!
9 сообщений из 9, страница 1 из 1
i need help!!!
    #35043146
Фотография surbanec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Помогите люди как можно воспроизвести миди файл через Winmm.dll?
...
Рейтинг: 0 / 0
i need help!!!
    #35044196
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Declare Function mciSendString Lib "winmm.dll" Alias _
"mciSendStringA" (ByVal lpstrCommand As String, ByVal _
lpstrReturnString As Any, ByVal uReturnLength As Long, ByVal _
hwndCallback As Long) As Long

Открываешь MIDI файл:
mciSendString "open c:\MySong.mid type sequencer alias mid1", 0&, 0, 0

Проигрываешь MIDI файл:
mciSendString "play mid1", 0&, 0, 0

Больше здесь:
http://www.geocities.com/smigman.geo/mci/mid.html
...
Рейтинг: 0 / 0
i need help!!!
    #35046797
Фотография surbanec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это всё срань и не работает и никогда работать не будет! Ты где этот код откопал?
Это пример я уже видел и он на VB5!
...
Рейтинг: 0 / 0
i need help!!!
    #35047047
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Эй, выбирай слова. Это раз. Читай внимательно посты. Это два. Я дал ссылку. Вот и иди туда.
...
Рейтинг: 0 / 0
i need help!!!
    #35047076
Фотография Aklin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
surbanecЭто всё срань и не работает и никогда работать не будет! Ты где этот код откопал?
Это пример я уже видел и он на VB5!

видимо а аффтара vb6 не их того места установлен. нормально работающий пример.
...
Рейтинг: 0 / 0
i need help!!!
    #35047082
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не поленился, потратил 4 минуты проверить в VB6:

Код: plaintext
1.
2.
   mciSendString "open c:\USB\MixNew\cactus.mid type sequencer alias mid1",  0 &,  0 ,  0 
   mciSendString "play mid1",  0 &,  0 ,  0 
 

Работает как из пушки.

Советы: учите язык, молодой человек. Не будьте самонадеянны. И учитесь интеллигентно общаться в интеллигентном обществе. А также выражать немного благодарности людям, безвозмездно старающимся вам помочь.
...
Рейтинг: 0 / 0
i need help!!!
    #35047338
Фотография surbanec
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня это не работает. Нужен другой способ.
...
Рейтинг: 0 / 0
i need help!!!
    #35047411
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
surbanecУ меня это не работает. Нужен другой способ.

Так вы тогда определитесь, действительно вы хотите Winmm.dll или вам все-таки "нужен другой способ".
...
Рейтинг: 0 / 0
i need help!!!
    #35047420
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
И что значит, не работает?
Какие-то ошибки?
Просто ничего не происходит?
Вы пробовали разные MIDI файлы?
Какова версия Winmm.dll?
Как вы ее регистрировали?

Покажите ваш код.

Почему такой заголовок: "i need help!!!" Называть так свои посты - против правил этого форума.
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / i need help!!!
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]