Database 版 (精华区)

发信人: sleep (休息休息), 信区: Database
标  题: Visual FoxPro 3.0中背景音乐的实现
发信站: 哈工大紫丁香 (2000年12月04日14:56:26 星期一), 站内信件

Visual FoxPro 3.0中背景音乐的实现
        在使用Visual FoxPro 3.0编制应用程序时，我们可以利用OLE嵌套的方法
很容易的为一个应用程序加入背
    景音乐。
       进入Visual FoxPro 3.0系统环境，在命令行窗口中键入CREATE FORM或在
‘文件’菜单中选择‘新建’、
  ‘表单’，即可建立一个新的表单。表单建立后可对表单进行一些设置，如表单
屏幕大小、表单底图、
    表单上的按钮、表单上要显示的文字等，做出一个漂亮的屏幕界面。点击‘表
单控制’上的‘OLE容器’
   ，并将其拖至FORM中任意位置。在‘插入对象’窗口中选择‘媒体剪辑’，选
中‘以图标显示’栏（必
   须选中此栏，否则无法将其隐藏起来），按‘确认’键退出。
       在‘媒体播放机’窗口中，选择‘文件’、‘打开’，从文件列表中选择
想要作为背景音乐的声音文件。
   作为背景音乐，必须是程序启动时开始播放，直到程序结束。由于音乐文件一
般不是很长，所以要求循环
   播放，此时可选择‘编辑’菜单中的‘选项’，在选项窗口中选中‘重复播放
’和去掉‘重放的控制条’
   前的选中标记，确认后退出。
       回到Visual FoxPro 3.0系统环境，按下鼠标右键，在弹出菜单中点击‘属
性’栏调出属性窗口。选择
  ‘Olecontrol1’对象，将它的‘Visible’属性设为.F.，‘Autosize’属性设
为.F.。再按下鼠标右键，
   在弹出菜单中点击‘代码’栏进入过程书写窗口，选择‘Form1’对象的‘
Activate’过程，在过程栏中
   加入：
    Thisform.Olecontrol1.Doverb(0)
    点击Form1窗体，按下鼠标右键，在弹出菜单中点击‘运行’，即可运行此程
序。
 
 

--
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.227.121]