Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

MIDI

plosion © (2005-05-25 16:05:00)
Люди, помогите: засунул в файл ресурса 3 midi файла. И нужно воспроизвести их. API'шной командой, типа:

PlaySound(pData, 0, SND_MEMORY + SND_ASYNC + SND_NOSTOP);

не катит: это только для вавок. Обыскался... не знаю, где ещё можно узнать. Помогите, пожайлуста!!!

plosion (2005-05-26 21:13:00) [1]
Гм... спасибо за массу комплиментов. Очень приятно :)
А насчёт "дурня"... ты наверное прав...

Digitman (2005-05-26 17:25:00) [2]

> plosion

да ты и впрямь дурень !)
тебе говорят о midiOut-реализациях, ты же продолжаешь гнуть свое про "файлик" , "MCI" и прочей схожей лабуде)

> Скачал я компонент - не устанавливается

ты страничку-то всю обшарил, сударь ?) или влом ? Digitman'ово дерьмо не устанавливается - и засим успокоились ?)

сходи на ее Home, лентяй !)

авось полегчает.

plosion (2005-05-26 17:13:00) [3]
Скачал я компонент - не устанавливается :(
Зато в инете нарыл (с трудом) не плохую процедурку:

procedure TForm1.Button1Click(Sender: TObject);
const
FileName = '1.mid';
begin
MCISendString(PChar('play ' + FileName), nil, 0, 0);
end;

Всё работает :) А вот как вытащить из ресурса файлик... пока не знаю. :( Никто не знает... а?

Digitman (2005-05-26 09:38:00) [4]
не мучайся, возьми какой-нибудь готовый компонент

например, http://www.wilsonc.demon.co.uk/files/midiutilities/midiutils.zip

plosion (2005-05-25 17:36:00) [5]
Digitman, а как с помощью него проиграть midi файл ресурса? Есть ли по этому вопросу статьи или док-ция, где можно прочитать поподробнее?

Digitman (2005-05-25 16:22:00) [6]
midiStreamOut()

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »