先运行力控应用程序(如演示工程——反应釜),实时数据库系统亦随之启动。
然后启动delphi6.0,创建一个新的工程。
在form1窗体中,放置DdeClientConv控件(system标签页),设置ConnectMode属性值为ddeAutomatic、DdeService属性值为db、DdeTopic属性值为db;
接下来放置DdeClientItem控件(system标签页),设置DdeConv为DdeClientConv1,设置DdeItem属性值为所要读取的数据库点参数值如dbmixvol.pv;
放置一个edit控件;
放置一个timer控件,设置interval属性值为100;在ontimer脚本中加入:
procedure TForm1.Timer1Timer(Sender: TObject)
begin
edit1.text:=form1.DdeClientItem1.Text
end
标签:
运行
力控
应用程序
工程
上传时间:
2014-01-22
上传用户:lwwhust