OnClearEvent
Diese Event Methode wird auf allen Clients aufgerufen, die diese Event Schnittstelle implementieren und verbinden, wenn ein Event gelöscht wird. Diese Methode wird auf allen Events aufgerufen, für eine Source ID nach einem Aufruf des SPS Funktionsblocks ADSCLEAREVENTS mit dem gesetzten iMode TCEVENTLOGIOFFS_CLEAREVENTSRCID.
HRESULT OnClearEvent(ByVal evtObj As Object);
Parameter
evtObj
[in] IDispatch Pointer auf ein neues Eventobjekt der Klasse TvEvent. Das Eventobjekt bietet den vollen Zugriff auf das gelöschte Event. Jeder Client erhält einen Hinweis auf das Eventobjekt und eine Kopie.
S_OK
Funktion wurde erfolgreich aufgerufen.
Visual Basic Beispielcode
Option Explicit
Dim WithEvents evtLogger As TCEVENTLOGGERLib.TcEventLog
' form load
Private Sub Form_Load()
' get the one and only event logger
Set evtLogger = New TcEventLog
End Sub
' event method
Private Sub evtLogger_OnClearEvent(ByVal evtObj As Object)
Dim evt As TcEvent
Set evt = evtObj
' print the message string in English
Debug.Print evt.GetMsgString(1033)
End Sub