精彩编程与编程技巧-VB的多媒体控件VBPLAY.VBX简介...

VB的多媒体控件VBPLAY.VBX简介
刘强 
VB是一种编程式多媒体开发工具，用VB开发多媒体的方法有很多。归结一下有以下四种：自行编写程序代码实现，使用对象连接和嵌入OLE2.0，调用API有关多媒体的函数，使用第三方VB控件开发商制作的多媒体控件VBX。其中第四种方法最简便，效果也最明显。
下文将简要介绍Autodesk公司的多媒体控件VBPLAY.VBX的功能和使用方法。
启动VB专业版后，选择File―Add File…,在WINDOWS的SYSTEM目录下选择VBPLAY.VBX，将VBPLAY.VBX加入到工具箱中,就可以看到ANIMATION著名的图标。
它的主要属性介绍如下：
1、具有基本属性：
name,height,width,top,left,forecolor,backcolor,enabled,visible,index, 还有一些特殊属性。
2、BorderStyle属性，设定边界条件。分别为0-none,表示无边界，1-Fixed Single,表示固定单线框，2-Sizable(缺省值），可调尺寸，3-Fixed Double,固定双线框。这些属性与其他控件类似。
3、All Color:保留所有WINDOWS系统可用的颜色。Colorcycling:保留WINDOWS系统调色板的颜色。
4、AniHeight 和Aniwidth,设定一个动画的幅面。
5，Autoplay属性，设定自动播放功能。如果设定为TRUE,则程序运行时动画文件自动播放，若设为FALSE,则需要用程序代码控制。
6、BeginFade,BeginFadeTime,Endfade,EndfadeTime,这是VBPLAY.VBX最精彩的部分，用这几个简单的属性就可以实现图象的淡入淡出效果。其中：
BeginFade表示动画开始时的效果设定。有三个选择项。cut:切换效果，无淡入淡出;fade to/From Black 即淡入效果；Fade to/From White 即淡出效果。以前必须调用Bitbil这样的W INDOWS API函数才能实现的功能现在只需设定属性即可实现。
BeginFadeTime设定淡入淡出效果执行的时间，与Timer的属性Interval一样，以毫秒为单位。
EndFade和Endfadetime表示结尾处的淡入淡出效果设定，其选项与BeginFade和BeginFadeTime相似。
7、FullScreen：全屏幕播放。
8、HideAnimation:如果不是在播放状态下，即在设计状态下，不要将画面显示出来。
9、LoopFrame:设定是否循环播放。可选值为TRUE或FALSE。
10、MemoryLoad:设定为TRUE则在打开动画时将它载入内存中，这样可以得到较快的播放速度。
11、play、pause、pauseatend，设定播放、暂停以及播放完后暂停的时间，以秒为单位。
12、有关SOUND的属性：Sound属性会打开一个对话框，在对话框中选择背景音乐，以真正实现“影音同步”,SoundDelay属性设定声音播放的延迟时间，以毫秒为单位。如果为负数，则表示在动画前先播放音乐,SoundRepeats属性声音播放的次数。
13、AniSettings属性，其上有“Click Here For Dialog”的标识，单击后会弹出对话框。以上所提到的大部分属性可以在对话框中设定，“TEST”按钮可以测试效果，“TRANSITIONS”可以设定淡入淡出的效果。
下面给出一例，在VB专业版中调试通过。
各控件的属性设置如下：
FORM1: caption:动画演示
windowstate:2-maxizimed
ANIMATION1: ANIMATION:C:\DEMO\DEMO.FLC
BeginFade:fade to/From Black
BeginFadeTime:3000