Agileo Automation предлагает библиотеки SECS / GEM и PV2, которые могут быть реализованы либо с использованием интерфейса Microsoft COM / DCOM, либо с использованием собственного .NET API.Для взаимодействия с 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 и PV2