对于自动模式:
1. 向窗体中加入DDEClientConv和DDEClientItem部件并命名;
2. 把DDEClientItem部件的DdeConv属性设置为DDEClientConv部件的名称;
如果在设计时建立,则通过对象观察器进行选择;如果在运行时建立联系, 则通过如下的一条语句设置属性的值:
DDEClientItem1.DdeConv := 'DDEClientConv1' ;
3. 和服务器建立联系,实现数据共享。
对于人工模式:
1.向窗体中加入DDEClientConv部件;
2.和服务器建立联系;
3. 数据更新时调用RequestData方法申请并获得数据。
7.3.2 和DDE服务器建立联系
和DDE服务器建立联系,既可以在设计时进行,也可以在运行时进行。
在设计时,DDE联接可以通过剪贴板进行粘贴。具体步骤如下:
1. 激活服务器程序,并选中你的客户程序欲联接的数据;
2. 把数据和DDE联接信息拷贝到剪贴板上。一般说来这只需要选择服务器应用程序的 Edit|Copy 菜单;
3. 在Delphi IDE的设计窗体中选中DDEClientConv部件;
4. 在Object Inspector(对象观察器)中单击DDEService属性或DDETopic属性,然后再单击Ellipsis按钮,打开DDE Info对话框;
5.选择Paste Link按钮。此时App编辑框和Topic编辑框被自动填充。如果Paste Link按钮变灰,说明你准备用作服务器的应用程序不支持DDE或者DDE信息没有被成功地拷贝到剪贴板上;
6.选择OK 按钮。此时Object Inspector中的DDEService、DDETopic 属性包含了建立一个DDE联接的正确值。
对于人工模式以下步骤是不需要的。
7.选中DDEClientItem部件,并在Object Inspector中设置DdeConv属性为已完成联接的DDEClientConv部件名称;
8.假如剪贴板上的DDE 联接信息仍保留的话,从Object Inspector的下拉列表框中选择 DDEItem 属性的值。否则输入正确的值。
在运行时,调用 SetLink 方法来建立DDE联接。
SetLink有两个String类型的参数,分别用来接受DDEService和DDETopic的值。过程执行后DDEClientConv部件的DDEService 和DDeTopic属性被设置。要注意的是:在运行时直接设置DDEService和DDETopic的值并不能建立一个DDE联接,而必须调用SetLink 方法进行初始化。
比如,下面的语句和Excel的System主题建立联接:
DDEClietnConv. SetLink('Excel','System');
调用SetLink方法后,还需要设置DDEClientItem部件的DDEItem属性。
更多内容请看PCdog.com--三层交换技术专题
