先運(yùn)行力控應(yīng)用程序(如演示工程——反應(yīng)釜),實(shí)時(shí)數(shù)據(jù)庫(kù)系統(tǒng)亦隨之啟動(dòng)?! ?BR>  然后啟動(dòng)delphi6.0,創(chuàng)建一個(gè)新的工程。  
  在form1窗體中,放置DdeClientConv控件(system標(biāo)簽頁(yè)),設(shè)置ConnectMode屬性值為ddeAutomatic、DdeService屬性值為db、DdeTopic屬性值為db;  <">

      技術(shù)頻道

      Delphi與力控的DDE方式通訊

      先運(yùn)行力控應(yīng)用程序(如演示工程——反應(yīng)釜),實(shí)時(shí)數(shù)據(jù)庫(kù)系統(tǒng)亦隨之啟動(dòng)。  
        然后啟動(dòng)delphi6.0,創(chuàng)建一個(gè)新的工程?! ?BR>  在form1窗體中,放置DdeClientConv控件(system標(biāo)簽頁(yè)),設(shè)置ConnectMode屬性值為ddeAutomatic、DdeService屬性值為db、DdeTopic屬性值為db;  
        接下來(lái)放置DdeClientItem控件(system標(biāo)簽頁(yè)),設(shè)置DdeConv為DdeClientConv1,設(shè)置DdeItem屬性值為所要讀取的數(shù)據(jù)庫(kù)點(diǎn)參數(shù)值如dbmixvol.pv;  
        放置一個(gè)edit控件;  
        放置一個(gè)timer控件,設(shè)置interval屬性值為100;在ontimer腳本中加入:  
          procedure TForm1.Timer1Timer(Sender: TObject);  
          begin  
            edit1.text:=form1.DdeClientItem1.Text;  
          end;

      按此在新窗口瀏覽圖片

        最后運(yùn)行delphi程序,則可看到動(dòng)態(tài)顯示的dbmixvol.pv值。
        你可以放置多個(gè)DdeClientItem控件來(lái)讀取更多的力控?cái)?shù)據(jù)庫(kù)信息,并結(jié)合其他的手段來(lái)組建自己的管理系統(tǒng)。



      文章版權(quán)歸西部工控xbgk所有,未經(jīng)許可不得轉(zhuǎn)載。

      主站蜘蛛池模板: 在线成人综合色一区| 丰满岳妇乱一区二区三区| 中文字幕无线码一区2020青青 | 无码一区二区三区免费视频| 国产主播福利一区二区| 亚洲蜜芽在线精品一区| 91精品福利一区二区| 韩国一区二区三区| 日韩AV在线不卡一区二区三区 | 精品视频一区二区三三区四区| 日韩精品中文字幕无码一区| 日本一区二区三区不卡视频| 亚洲乱码国产一区网址| 亚洲一区二区影院| 国产一区二区三区福利| 亚洲AV无码一区二区乱子伦 | 一区二区三区电影网| 国产一区二区高清在线播放| 日本一区二区在线播放| 日本一区中文字幕日本一二三区视频| 精品视频一区二区三区| 亚洲一区二区三区在线| 国产激情一区二区三区 | 波多野结衣一区视频在线| 午夜精品一区二区三区在线观看| 精品国产一区二区三区AV| 色欲AV蜜桃一区二区三| 国产乱码精品一区二区三区| 中文乱码人妻系列一区二区| 最美女人体内射精一区二区| 精品视频一区二区观看| 国产一区视频在线| 伊人久久一区二区三区无码| 国产一区二区三区播放心情潘金莲| 精品人体无码一区二区三区| 日本一道高清一区二区三区| 久久久精品人妻一区亚美研究所 | 亚洲一区二区免费视频| 精品视频在线观看你懂的一区| 伊人色综合视频一区二区三区| 久久国产精品一区二区|