CxFmsAlarmLogCtrl Events

Scripting > CxHmiFms > CxFmsAlarmLogCtrl Object > CxFmsAlarmLogCtrl Events

CxFmsAlarmLogCtrl Events

The CxFmsAlarmLogCtrl object contains the following events.

EditModeChange
EndRefresh
EventInitialize
EventPumpData

EditModeChange

Begin or finish editing data.

Syntax

CxFmsAlarmLogCtrlObject_EventEditModeChange()

Remarks

This event will be fired if one of the following conditions is met.

The user begins editing data for the first time
The user begins editing data after the Save button has been pressed
The user clicks the Save button after editing data

Example

The following example displays a message box when the Edit mode changes.

Sub FmsAlarm_EventEditModeChange()

Dim This : Set This = FmsAlarm

MsgBox "Edit mode changed"

End Sub

EndRefresh

A refresh operation has completed.

Syntax

CxFmsAlarmLogCtrlObject_EventEndRefresh(Result As Integer, Status As Integer)

Parameters

Parameter	Required	Description
Result	Yes	An integer specifying whether the refresh succeeded or failed. Possible values for this property are as follows. 0 — Success 1 — Failure
Status	Yes	An integer specifying whether or not the refresh was canceled. Possible values for this property are as follows. 0 — Not canceled 1 — Canceled

Parameter

Required

Description

Result

Yes

An integer specifying whether the refresh succeeded or failed. Possible values for this property are as follows.

0 — Success
1 — Failure

Status

Yes

An integer specifying whether or not the refresh was canceled. Possible values for this property are as follows.

0 — Not canceled
1 — Canceled

Example

The following example displays a message box if the refresh was canceled.

Sub FmsAlarm_EventEndRefresh(Result, Status)

Dim This : Set This = FmsAlarm

If Status = 1 Then

MsgBox "Refresh canceled"

End If

End Sub

Initialize

The control is initialized.

Syntax

CxFmsAlarmLogCtrlObject_EventInitialize()

Example

The following example displays a message box when the control is initialized.

Sub FmsAlarm_EventInitialize()

Dim This : Set This = FmsAlarm

MsgBox "Control initialized"

End Sub

PumpData

(Obsolete)