Movicon Help on Line - Rel. 11.7.1301
Syntax |
SaveChanges() |
Description |
This method allows you to save the referenced Command List for the object in question. Any modifications to the command list will only be put into effect and executable by the object after the SaveChange method has been invoked.
Caution: Modifications to the Object command lists, except for Button objects, will be applied only if when the object's Command List already contains at least one command at its initialization. In cases where the object in question has been associated with a configuration file, the save command of this configuration file will also save any new Command Lists and in this case the next time page is loaded the new command list will be apply when control is initialized. |
Parameter |
Description |
None |
None
|
Result |
Boolean |
Example1:
Public Sub Click()
Dim objButtonRelease As ButtonCmdTarget
Dim objCommandList As CommandsListCmdTarget
Set objButtonRelease = GetSynopticObject.GetSubObject("objButtonRelease").GetObjectInterface
Set objCommandList = objButtonRelease.GetCommandsInterfaceOnRelease
objCommandList.SaveChanges()
Set objCommandList = Nothing
Set objButtonRelease = Nothing
End Sub
Example2:
Public Sub Click()
Dim objRect As DrawCmdTarget
Dim objCommandList As CommandsListCmdTarget
Set objRect = GetSynopticObject.GetSubObject("objRect")
Set objCommandList = objRect.GetCommandsInterfaceOnRelease
objCommandList.SaveChanges()
Set objCommandList = Nothing
Set objRect = Nothing
End Sub