文件名称:力控应用程序实时数据库系统
介绍说明--下载内容来自于网络,使用问题请自行百度
先运行力控应用程序(如演示工程——反应釜),实时数据库系统亦随之启动。
然后启动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
,opc rslinx
然后启动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
,opc rslinx
(系统自动生成,下载前可以参看下载内容)
下载文件列表
新建文件夹/Project1.cfg
新建文件夹/Project1.dof
新建文件夹/Project1.dpr
新建文件夹/Project1.res
新建文件夹/Unit1.ddp
新建文件夹/Unit1.dfm
新建文件夹/Unit1.pas
新建文件夹/Unit1.~ddp
新建文件夹/Unit1.~dfm
新建文件夹/Unit1.~pas
新建文件夹
新建文件夹/Project1.dof
新建文件夹/Project1.dpr
新建文件夹/Project1.res
新建文件夹/Unit1.ddp
新建文件夹/Unit1.dfm
新建文件夹/Unit1.pas
新建文件夹/Unit1.~ddp
新建文件夹/Unit1.~dfm
新建文件夹/Unit1.~pas
新建文件夹
本网站为编程资源及源代码搜集、介绍的搜索网站,版权归原作者所有! 粤ICP备11031372号
1999-2046 搜珍网 All Rights Reserved.