Indicates when a GroupRead or GroupWrite completes
VB
Dim MyPLC As New GELink.Controller("192.168.1.45")
Dim WithEvents MyGroup As New GELink.TagGroup
Dim Tag1 As New GELink.Tag("%R1")
Dim Tag2 As New GELink.Tag("%R2")
' * add the event handler
AddHandler MyGroup.Update, AddressOf MyGroup_Update
' * add tags to group
MyGroup.AddTag(Tag1)
MyGroup.AddTag(Tag2)
' * Read the Group
MyPLC.GroupRead(MyGroup)
' * Event Handler
Private Sub MyGroup_Update(ByVal sender As Object, ByVal e As GELink.TagGroupEventArgs) Handles MyGroup.Update)
' * what caused event
Console.WriteLine(e.EventName)
' * process list of tags
For Each (GELink.Tag theTag in e.TagList)
Console.WriteLine(theTag.Value.ToString())
Next
End Sub
C#
GELink.Controller MyPLC = new GELink.Controller("192.168.1.45")
GELink.TagGroup MyGroup = new GELink.TagGroup();
GELink.Tag Tag1 = new GELink.Tag("%R1");
GELink.Tag Tag2 = new GELink.Tag("%R2");
// add the event handled
MyGroup.GroupUpdate += new MyTag.GroupUpdateEventHandler(MyGroup_Update);
// read the tag
MyPLC.ReadTag(myTag);
// event handler
void MyGroup_Update(sender As Object, e As GELink.DataChangeEventArgs) Handles Tag1.Changed)
{
if( e.QualityCode == ResultCode.QUAL_GOOD)
Console.WriteLine(e.Value.ToString());
}
Namespace: GELink
Assembly: INGEAR.NET.GELink (in INGEAR.NET.GELink.dll)