敬业的IT人 互联网 佚名 2008-4-17 19:44:11

播放.flc动画文件的方法与.wav及.midi并没有什么不同，最后完成的程序
大致如下：
SubPlaySound(filename)
DimcmdAsString
CallmciSendString("closeMyFlc",0,0,0)'MyFlc这个名称可依需要
来修改
cmd="open"&filename&"aliasMyFlc"
CallmciSendString(cmd,0,0,0)
CallmciSendString("playMyFlc",0,0,0)
EndSub
注：有些机器可能会因为没有安装.flc的驱动程序而无法播放，欲检查机器中是否安装有播放.flc的驱动程序，可先利用Windows提供的媒体播放程序播放.flc文件看看。

如何将.flc动画档放在某一个hWnd之中播放？上一技巧，会开启独立的窗口来播放.flc动画档，如何将它放在某一个Form或PictureBox之中播放？假设我们想将.flc放在Picture1之中播放，则必须将openMCI指令由原先
的：
"open"&filename&"aliasMyFlc"
改成:
"open"&filename&"aliasMyFlcparent"&Picture1.hWnd&"style"
&WS_CHILD
则.flc就会在Picture1之中播放。
注：WS_CHILD等于&H40000000。

最新文章

显示多媒体信息[04-17]

用VB实现应用程序在局域网络上自动更新[04-17]

DataGrid控件的使用五[04-17]

VB图像处理之像素的获取和输出[04-17]

VisualBasic移除Form右上方之『X』按钮[04-17]

VB5.0数据库编程经验小集[04-17]

相关文章