2012-01-16 543 views
4

我必須使用工業標準協議SECS/GEM PV2在我的應用程序和另一臺PC之間實現通信。SECS/GEM協議是否有可用的庫?

有沒有我可以使用Delphi的任何庫? 谷歌迄今沒有給我任何可用的結果,也許有人已經有了這個協議的經驗?

回答

0

Agileo Automation提出了可以使用Microsoft COM/DCOM接口或使用本機.NET API實現的SECS/GEM和PV2庫。 對於與Delphi的接口,需要使用COM互操作性。

可以使用示例應用程序演示Microsoft Excel中使用VBA和COM互操作性的庫功能。

整合是相當簡單的,看起來像下面發送收集事件與變量:

Sub SendCollectionEvent() 
     Dim CEID As String 
     Dim SendCollectionEventStatus As Integer 

     Dim value1 As New GEM.ValueObject 
     Dim res As Boolean 

     ' Get Collection Event value to send from an Excel cell 
     CEID = Range("CEID").Text 

     'Update variable 
     Call value1.SetValueAscii("Custom text description") 
     res = objGEM.SetValue("11011", value1) 

     ' Send the CE 
     SendCollectionEventStatus = objGEM.SendCollectionEvent(CEID) 

     ' Update status in Excel 
     Range("SendCollectionEventStatus").value = SendCollectionEventStatus 

    End Sub 

有關更多信息,你可以看看Agileo Automation SECS/GEM and PV2 library