下面,我们将利用Delphi4来开发一个简单的Real文件的播放程序,当然作为例程序,它只有简单的Real
文件的打开、播放、暂停、停止和关闭功能,但麻雀虽小,五脏俱全嘛。下边我们一步一步来实现这个
小型的Real播放器吧。不过,在您进行下面的工作之前,我们还要注意,要想在Delphi中使用Real控件,您的
计算机中必须安装有RealPlayer播放程序,否则,哈哈:那可是不行的。
在Delphi4的可视化编程环境中,选择File菜单下的"New Application"项,新建一个新的应用程序。然后
选择Component(组件)菜单下的"Import ActiveX Control..."(导入ActiveX控件)选项,选中其中的
"Real Player ActiveX Control Library(Vision1.0)"项,并单击Install,会出现一个install窗口。
★如果要把它添加到一个已经存在的包中,在"Into existing package"对话框中的"File name:"窗口中
选择你想安装的路径,并单击"OK";会弹出一个确认的对话框,它问你"Package dclusr40.bpk will
be rebuilt. Continue?",单击"Yes";在弹出的窗口中单击击"Install",该控件就安装完毕。
★如果要把它添加到一个新建的包中,在"Into new package"对话框中的 "File name:"窗口中选择你想
安装的路径,并新建一个包,假如命名为test,并单击"OK";它问你"Package test.bpk will be built.
Continue?",单击"Yes"。 在弹出的窗口中单击击"Install",该控件就安装完毕。
这时,你会在控件条的ActiveX下发现一个新的控件,名字为RealAudio。