先運行力控應用程序(如演示工程——反應釜),實時數據庫系統亦隨之啟動。
然后啟動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