Application

ED	avaliable
RT	avaliable

Remarks:

Includes the whole application of the control system. This is the only object in the hierarchy, that can be used by the internal function GetObject of Visual Basic. You can only use GetObject, if the Runtime of the control system is already running.

Attention:


	Editor:	ApplicationED

	Runtime:   Application

Hint: The function CreateObject should not be used to access the application.

The object Application serves for several purposes:

· As root object it enables the access to other objects of the hierarchy of the control system.
· It offers information about the computer.

Using the object 'Application'
If you are using the control system to operate Microsoft Outlook from within another application, use the method GetObject to access the object Application.

On closing zenOn the event Close is executed. The object Application has to be defined with WithEvent in order to be able to execute the event Close.

Properties:

Computer	Enabled	Hide
MyWorkspace	Name	Path
Version	VersionNumber	hWnd

Methods:

Activate	Close	DynPropertiesEnum[GET]
DynProperties[GET]	DynProperties[PUT]	Projects
zenOnPath[GET]

Events:

OnClose

Samples:

Public Sub GetProjects()
Dim strResult As String
Dim zPROJECT As Project
Dim i As Integer

	'get active project...
	strResult = "Active Project: " & MyWorkspace.ActiveDocument.Name & vbCrLf & vbCrLf
	'get projects in workspace...
	strResult = strResult & "Projects in Workspace:" & vbCrLf
	For i = 0 To ApplicationED.Projects.Count - 1
		Set zPROJECT = ApplicationED.Projects.Item(i)
		If Not zPROJECT Is Nothing Then
			strResult = strResult & zPROJECT.Name & vbCrLf
		End If
	Next i
	'Show Result in a Messagebox
	MsgBox strResult, vbInformation, "GetProjects"
End Sub