Online Player DIY

RealPlayer software for network play we will definitely be familiar. Its strong network of video, audio and other media playback was very envious of people. If you yourself can do one of the heart must feel good.

RealPlayer software itself has a RealPlayer plug-in. Because it is used in Active technology, which for our players to create their own to create the conditions for RealPlayer. ActiveX technology made because the application plug-ins, can be easily applied to any support ActiveX technology development language, and be used as a common component. We are on to Delphi 5.0 in the following example, create a network of their own RealPlayer video player.

Add RealPlayerActive ActiveX plug-in item to the component bar, ready for use. Select Main Menu Component 鈫?Import ActiveX Control items, there will be an Import ActiveX window, the window's upper selection list stored in the computer system already has a variety of Active plug-ins. If you installed the RealPlayer software, you find a RealPlayer ActiveX Control Library, and selected, then select the Install ... button in the lower window, there Install window, keep the default values, select OK, you can add to complete. Back to the ActiveX component bar item, you will find the icon RealPlayer software. This, RealPlayer can be used as a common component.



Figure 1 RealPlayer Active

Create a new Delphi application, then the components in the window bar item in the RealPlayer ActiveX components, into the window, named RealAudio1, the emergence of a simplified RealPlayer interface. But it is only the control interface, there is no video image interface. It does not matter component in the RealPlayer Controls property to add "ImageWindow", then click on the window, the video images began to appear in the "ImageWindow" Then, after adding "ControlPanel" attribute value (comma separated). This control interface appears, you can continue to add in the back "Statuabar" value, the status bar appears.

RealPlayer component will be driven to the appropriate size of the window to add a command button and name it Play. Then in the button click event add the following code:

procedure TForm1.Button1Click (Sender: TObject);

begin

RealAudio1.source =''c: A.rm''; / / Play the movie source.

RealAudio1.doplay; / / start playing movies

end;

A RealPlayer player to finish, and simple it! But this is only a brief RealPlayer component, it also has many properties and methods, party of free imagination, design a more complete player.






相关链接:



mp3 to aac converter



Dial Up And Connection Tools Expert



Youtube Video To Iphone Store



mkv FILES



Youtube FLV to Cell Phone Products



blackberry video FORMATS



Youtube To DVD Store



Convert DVDs To Any Audio/Video Software



Open Flash To IPod



Job on the road a few lessons to remember



Winner Video Splitter



convert mp3 to m4a



reviews Covert Surveillance



Youtube Video to AVI Store