先运行力控应用程序(如演示工程——反应釜),实时数据库系统亦随之启动。<BR> <BR> 然后启动delphi6.0,创建一个新的工程。<BR> <BR> 在form1窗体中,放置DdeClientConv控件(system标签页),设置ConnectMode属性值为ddeAutomatic、DdeService属性值为db、DdeTopic属性值为db;<BR> <BR> 接下来放置DdeClientItem控件(system标签页),设置DdeConv为DdeClientConv1,设置DdeItem属性值为所要读取的数据库点参数值如dbmixvol.pv;<BR> <BR> 放置一个edit控件;<BR> <BR> 放置一个timer控件,设置interval属性值为100;在ontimer脚本中加入:<BR> <BR> procedure TForm1.Timer1Timer(Sender: TObject);<BR> <BR> begin<BR> <BR> edit1.text:=form1.DdeClientItem1.Text;<BR> <BR> end;</P><P> <br><A HREF="/editor/uploadfiles/learns01/20047910193040706.jpg" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/20047910193040706.jpg" border=0 alt=按此在新窗口浏览图片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 最后运行delphi程序,则可看到动态显示的dbmixvol.pv值。<BR> 你可以放置多个DdeClientItem控件来读取更多的力控数据库信息,并结合其他的手段来组建自己的管理系统。
Delphi与力控的DDE方式通讯
2013-03-26 14:02 浏览:168