当前位置：首页 -> 技术开发 -> 程序开发 -> 用Delphi 5.0编写在线播放器

用Delphi 5.0编写在线播放器

时间： 2021-07-31 作者：daque

文/张国军　　对于realplayer搜集播放软硬件大师确定不会生疏。其宏大的搜集视频、音频等媒介播放功效让人很是向往。即使本人也能做一个，内心确定发觉不错。　　realplayer软硬件自己有一个realplayer插件。因为它沿用的是active本领，这就为咱们创造本人的realplayer播放器创作了前提。由于运用activex本领做出的插件，不妨很简单地运用就任何扶助activex本领的开拓谈话中，并动作一个普遍组件加以运用。咱们在底下就以delphi 5.0为例，创造一个属于本人的realplayer搜集电影和电视播放器。　　增添realplayeractive插件到组件栏activex项中，以备运用。采用主菜单component→import activex control项，将展示一个import activex窗口，该窗口的上部采用列表中寄存了本计划机体例中仍旧具有的百般active插件。即使你安置了realplayer软硬件，就居中找到realplayer activex control library一项并选定，而后采用窗口下部的install...按钮，展示install窗口，维持默许值，采用ok，即可增添实行。回到组件栏activex项中，你会创造realplayer软硬件的图标。如许，realplayer就可看成一个普遍组件运用。图1 realplayer active　　兴建一个delphi运用步调，而后在窗口中把组件栏activex项中的realplayer组件拉入窗口中，定名为realaudio1，展示一个简化的realplayer界面。但它惟有遏制界面，没有视频图像界面。这不重要，在realplayer组件的controls属性中介入“imagewindow”，而后点击底下的窗口，视频图像发端展示，在“imagewindow”后接着增添“controlpanel”属性值(用逗点划分)。如许遏制界面展示，还不妨在反面连接增添“statuabar”值，出近况态条。　　将realplayer组件拉动到符合巨细，在窗口中增添一吩咐按钮并定名为play。而后在按钮的单击事变中增添以次代码：　　procedure tform1.button1click(sender: tobject);　　begin　　realaudio1.source=' c:a.rm' ; //播放的影戏源。　　realaudio1.doplay; //发端播放影戏　　end;　　一个realplayer播放器就做结束，大略吧！然而正文不过大略引见realplayer组件，它还具有很多属性和本领，诸位不妨自在表现想像力，安排一个越发完备的播放器。

用Delphi 5.0编写在线播放器

相关推荐

推荐下载

热门阅览

最新排行