时间: 2021-07-31 作者:daque
兴建一个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; 兴建一个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; 它还具有很多属性和本领,诸生大侠不妨自在表现想像力,安排一个越发完备的播放器!