delphi中DDE通信技术

概述DDE可实现进程与进程之间的通讯 服务端需要放2个空间。 DDE conver 会话上下文。 还有一个DDEitem  ;; 将 ddeitem 志向 DDe conver; 然后运行程序； DDE服务器就启动了； 在 ddeitem 这个方法中就可以获取数据了 procedure TForm1.ddepxbitemPokeData(Sender: TObject); var   str: str

DDE可实现进程与进程之间的通讯

服务端需要放2个空间。 DDE conver 会话上下文。 还有一个DDEitem  ;; 将 ddeitem 志向 DDe conver;

然后运行程序； DDE服务器就启动了；

在 ddeitem 这个方法中就可以获取数据了

procedure TForm1.ddepxbitemPokeData(Sender: TObject);
var
  str: string;
begin
  str := ddepxbitem.lines.Text;
  str := ddepxbitem.lines.Strings[0];
end;

DDE客户端，也有 conver 与 item 2个控件

其中 ddeconv 需要指定DDE服务程序 与 DDe主题，也就是DDEserver 控件名字；

ddeconver 指向 DDe conver;   ddeitem 指向 DDE服务的 item 组件。

一个会话下面可以挂多个item; 多个ITEM可以同时监听。

 if not dde1.Setlink('project1','ddepxb') then
    Exit;
  dde1.Openlink;
  s := TStringList.Create;
  s.Add('pxb');
  s.Add('zrtt');
  try
    if not dde1.PokeDatalines('ddepxbitem',s) then
      exit;
  finally
    FreeAndNil(s);
  end;

closelink; 关闭连接

这几个方法，是想DDE服务发送数据；

总结

以上是内存溢出为你收集整理的delphi中DDE通信技术全部内容，希望文章能够帮你解决delphi中DDE通信技术所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。