Technical Reference Manual - InduSoft

Overview of VBScript
Graphic Module
GRAPHICS SCRIPT
The Graphics Script interface can be edited by its icon from the Graphics tab of the Project Explorer:
This interface can be used to execute logics on the following events, based on pre-defined sub-routines:
• Graphics_OnStart() : The code configured within this sub-routine is automatically executed just once
when the graphic module is started. This interface is useful for initializing variables or executing logics
that must be implemented when running the project.
• Graphics_WhileRunning() : The code configured within this sub-routine is automatically executed
continuously while the graphic module is running. The rate in which this sub-routine is called depends on
the performance of the platform where the project is running.
• Graphics_OnEnd() : The code configured within this sub-routine is automatically executed just once
when the graphic module is closed.
• Graphics_OnScreenResize( width, height ) : The code configured within this sub-routine is
automatically executed just once when the screen resolution of the runtime station changes. The new
width and height of the screen (in pixels) are passed to the sub-routine as parameters.
Note: The Graphics_OnScreenResize() sub-routine is intended for projects running in CEView
on Windows Embedded devices that can switch between Portrait and Landscape display modes. It
is not supported for projects running on Windows PC or in the Thin Client.
Example:
Important: Do not change the name of the predefined sub-routines. If you do, then the system will
not be able to automatically execute them.
'Variables with local scope can be declared and initialized here
Dim MyDate
MyDate = Date()
Dim MyValue
MyValue = 100
'Procedures with local scope can be implemented here
Function MyNewProcedure(nCount)
MyNewProcedure = nCount + 1
End Function
Function AreaRec(side1, side2)
AreaRec = side1 * side2
End Function
Sub CheckHiLimit(myValue, myHiLimit)
If myValue > myHiLimit Then
MsgBox("Value out of range")
End If
End Sub
Page 764
InduSoft Web Studio