📄 5318.html
字号:
<html>
<head>
<title>Re: How to play MID</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>Re: How to play MID</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by <a href="mailto:honey0@tcts1.seed.net.tw">Honey</a> on September 06, 1998 at 13:41:57:<p>
In Reply to: <a href="5314.html">How to play MID</a> posted by Kavin on September 06, 1998 at 01:46:13:<p>
: 请问如何play mid file ...<p>可以用Multimedia控制项 或者用mciSendString函式<br>mciSendString宣告方式如下<br>Private Declare Function mciSendString Lib _<br>"winmm.dll" Alias "mciSendStringA" _<br>(ByVal lpstrCommand As String, ByVal _<br>lpstrReturnString As String, ByVal _<br>uReturnLength As Long, ByVal _<br>hwndCallback As Long) As Long<br>'若在模组宣告 private 得去掉<p><br>使用方法如下<br>Call mciSendString("open C:\untitled.mid type sequencer _<br>alias e", 0, 0, 0)<br>'开启档案"C:\untitled.mid",取名为另一个别名 e<br>'type sequencer 指使用的设备<p>Call mciSendString("play e wait", 0, 0, 0)<br>'播放别名e所代表的档案 ,加入wait代表声档播放 _<br>完毕时才将使用权交回<p>Call mciSendString("close e ", 0, 0, 0)<br>'关闭档案
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 5318-->
<!--top: 5322--><li><a href="5322.html">Re: How to play MID</a> <b>Kavin</b> <i>16:34:24 9/06/98</i>
(<!--responses: 5322-->2)
<ul><!--insert: 5322-->
<!--top: 5397--><li><a href="5397.html">Re: How to play MID</a> <b>Honey</b> <i>18:55:51 9/08/98</i>
(<!--responses: 5397-->1)
<ul><!--insert: 5397-->
<!--top: 5562--><li><a href="5562.html">Re: How to play MID</a> <b>Kavin</b> <i>23:30:33 9/11/98</i>
(<!--responses: 5562-->0)
<ul><!--insert: 5562-->
</ul><!--end: 5562-->
</ul><!--end: 5397-->
</ul><!--end: 5322-->
</ul><!--end: 5318-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -