znl3512
級別: 探索解密
精華主題: 0
發(fā)帖數(shù)量: 4 個
工控威望: 133 點
下載積分: 578 分
在線時間: 7(小時)
注冊時間: 2013-07-12
最后登錄: 2024-10-20
查看znl3512的 主題 / 回貼
樓主  發(fā)表于: 2016-11-16 00:30
WINCC工程中有許多設(shè)備,要點擊一下,彈出一個子畫面,再點起動或停止
特做了一個.net控件來實現(xiàn)

用法
Dim  msg
Set msg=ScreenItems("msg")

'type :0 為運行,停止彈出窗,  1為開到位,關(guān)到位彈出窗
'x ,y彈出 的坐標(biāo)
'變量名 為字符串
'tagrun 運行反饋 或開到位信號
'tagstop 停止反饋 或關(guān)到位信號
'tagerr 故障信號
'start  運行或開 按鈕置位的變量
'stop 停止或關(guān)  按鈕置位的變量
'devname 設(shè)備名稱
'show(int type, int x, int y, string tagrun, string tagstop, string tagerr, string start, string stop, string devname)
msg.show 1,83,214,"a_2","a_3","a_4","a_6","a_7","羅茨泵"
End Sub
wc.rar (289 K) 下载次数:75
往事如風(fēng)
科技改變制造
級別: 網(wǎng)絡(luò)英雄

精華主題: 0
發(fā)帖數(shù)量: 11370 個
工控威望: 18527 點
下載積分: 12046 分
在線時間: 2686(小時)
注冊時間: 2013-01-31
最后登錄: 2024-11-02
查看往事如風(fēng)的 主題 / 回貼
1樓  發(fā)表于: 2016-11-16 16:17
謝謝,學(xué)習(xí)了
三人行者必有我?guī)?,擇其善者而從之