Конференция VBStreets

**VERITAS** » 10.03.2005 (Чт) 21:33

Привет всем.

Вопрос такой: как воспроизводить не midi файлы а через midi. Например как это делается в креках???

Теории пока нет, но любые намеки могут помочь

Спасибо!

**tyomitch** » 10.03.2005 (Чт) 22:09

Из ресурсов.

**VERITAS** » 11.03.2005 (Пт) 9:29

Так это я умею, тут дело в другом.
Я встречал даже не креки а демки, например: farb-rausch демки (см аттач). Так она весит 64 кб. а музыка в ней на 5 минут. Или вот крек например (см аттач).
Не похоже, чтобы в них ресурсы были!!! Ведь можно как то использовать системный синтезатор звуков через код:? Только вот как?

Может кто знает...

**alibek** » 11.03.2005 (Пт) 9:31

Код: Выделить всё: Private Declare Function midiOutClose Lib "winmm.dll" (ByVal hMidiOut As Long) As Long Private Declare Function midiOutOpen Lib "winmm.dll" (lphMidiOut As Long, ByVal uDeviceID As Long, ByVal dwCallback As Long, ByVal dwInstance As Long, ByVal dwFlags As Long) As Long Private Declare Function midiOutShortMsg Lib "winmm.dll" (ByVal hMidiOut As Long, ByVal dwMsg As Long) As Long Dim hMidiOut As Long Private Sub Form_Load() 'KPD-Team 2000 'URL: http://www.allapi.net/ 'E-Mail: KPDTeam@allapi.net Dim T As Long midiOutOpen hMidiOut, 0, 0, 0, 0 midiOutShortMsg hMidiOut, 6567325 T = Timer Do: DoEvents: Loop Until Timer > T + 4 midiOutClose hMidiOut End Sub

**_Мика_** » 11.03.2005 (Пт) 10:27

Про farb-rausch это отдельная история....я, так скажем, большой поклонник их..Я даже скачал их ней редактор в котором можно эти фишки делать...но нечего не получилось :cry:

**VERITAS** » 11.03.2005 (Пт) 10:33

Да с редактором я тоже пробовал работать, однако тяжелый он, трудно разобраться, так и ничего не выходит.

**_Мика_** » 11.03.2005 (Пт) 10:37

Но вообще рябята молодцы...они наверно все рисунки, все что можно выдерают из DirectX...это мое предположение..

Сори что не по :roll:

теме

**tyomitch** » 11.03.2005 (Пт) 10:38

Посмотрите http://bbs.vbstreets.ru//viewtopic.php?p=64857#64857 - может, надо это?

**VERITAS** » 11.03.2005 (Пт) 10:41

alibek че то я твой пример разобрать не могу, вроде как бы должен сигнал посылаться, а он не посылается!!!

tyomitch щас гляну.

**VERITAS** » 11.03.2005 (Пт) 11:01

tyomitch то что надо, "щас будем курить, щас будем творить"

To tyomitch - зачем столько вежливости? На "Вы" то зачем обращаться? Мне даже как-то не по-себе, давай просто на "ты", я еще не такой старый... :wink:

Конференция VBStreets

Музыка в креках

Музыка в креках

Кто сейчас на конференции