掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
MidiStreamを演奏するには？ (ID：13137)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
...さん、調べましたら、Winapiのplaysoundでは、midiは鳴らせないようなのです。 http://www.interq.or.jp/moonstone/person/del/sound.htm参照しました。 ●ＭＩＤＩで鳴らした音のループを制御 にかかれていました。 MR.XRAYさん、そちらの記載を参考に、exeに埋め込みました。 ここまでは良かったのですが、Midiを鳴らす手立てがわかりません。 uses MMSYSTEM; procedure TForm1.Button1Click(Sender: TObject); var RS:TResourceStream; begin RS := TResourceStream.Create(hInstance,'MySound','Midi'); try sndPlaySound(RS.Memory,SND_MEMORY or SND_SYNC); finally RS.Free; end; end; 等としても、音がでません。 exe内部に格納されているのは、リソースハッカー等のソフトを使用して確認してみました。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.