<< Clique para Mostrar o Sumário >>
OnTagRead |
OnTagRead(Tag)
Ocorre na leitura de um Tag de Comunicação, sempre que um novo valor ou um erro é retornado pelo Driver de Comunicação, ou seja, se o valor ou a qualidade do Tag de Comunicação não mudarem, este evento não é disparado. Para que este evento funcione, a propriedade EnableDriverEvent deve obrigatoriamente estar habilitada. Além disto, a propriedade PercentDeadband também pode exercer influência sobre a ocorrência do evento, caso a propriedade EnableDeadband esteja habilitada. O script a seguir contém um exemplo de uso deste evento.
Sub Tags_OnTagRead(Tag)
Set Obj = Application.GetObject("Dados1.TagName")
Obj.Value = Tag.Name
Set Obj = Application.GetObject("Dados1.TagRead")
Obj.Value = True
Set Obj = Application.GetObject("Dados1.TagType")
Obj.Value = TypeName(Tag)
End Sub