Search - Form1 - CodeBus

Search - Form1 - List

[hospital software system] www DL : 0: 先运行力控应用程序（如演示工程——反应釜），实时数据库系统亦随之启动。　　　　然后启动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
Date : 2025-12-21 Size : 5kb User : 慰藉