引言： 新建一个Delphi应用程序，然后在窗口中把组件栏ActiveX项中的RealPlayer组件拉入窗口中，命名为RealAudio1，出现一个简化的RealPlayer界面。
摘要：大体步骤：
1：先创建一个窗体。
2：将一个label1，一个按扭 bitbtn1,bittn2 放入窗体。
3：对bitbtn1 的onclick 事件编程。
编程如下：
.......
var
tp:ttcpclient;
strname,straddr:string;
begin
tp:=ttcpclient.create(self);
tp.close;
tp.open;
strname:......
摘要： 所谓动态菜单是指菜单项随着程序的操作变化而变化。现在，我们用delphi来实现这一功能，具体步骤如下：
1．首先，确定动态菜单的数据来源，即要确定动态菜单标题是来自windows的系统注册表，还是来自一个数据库，或者是来自一个子目录，主要由程序的功能而定。这里假设主窗口名为mainform，上面已有主菜单，其动态菜单的数据源是一个string（字符串）类型的变量，名称为submenuite......
做一个自己的网络在线播放器新建一个delphi应用程序,然后在窗口中把组件栏activex项中的realplayer组件拉入窗口中,命名为realaudio1,出现一个简化的realplayer界面.但它只有控制界面,没有视频图像界面.这不要紧,在realplayer组件的controls属性中加入“imagewindow”,然后点击下面的窗口,视频图像开始出现,在“imagewindow”后接着添加“controlpanel”属性值（用逗号分开）.这样控制界面出现,还可以在后面继续添加“statuabar”值,出现状态条.
【程序编程相关:
Delphi中使用XML一例】 【推荐阅读:
远程程序运行状态的简单监控】
将realplayer组件拉动到适当大小,在窗口中添加一命令按钮并命名为play.然后在按钮的单击事件中添加以下代码: 【扩展信息:
得到Win9X里缓存中的密码】
procedure tform1.button1click(sender: tobject);
begin
realaudio1.source= c:\a.rm ; //播放的电影源.
realaudio1.doplay; //开始播放电影
end; ...
下一页 摘要：你厌倦mediaplayer吗？用了它你的exe会大7k。
uses
windows, classes, forms, mmsystem, winprocs;
var
wdeviceid: word;
playwindow: hwnd;
procedure openmci(pwindow: hwnd; filename, devicetype: pchar);
var
......
