ZenWorkspace.OnElementCreated

OnElementCreated(obElement As Element)

Parameters

obElement As Element

Returns an object of type Element

Remarks

This event is fired, when a new element is created within a picture.

Private Sub ZenWorkspace_OnElementCreated(ByVal obElement As Element)
	Dim obMpElem As CD_ManipulationElement

	Set obMpElem = New CD_ManipulationElement
	Set obMpElem.Parent = Me
	Debug.Print "Element of Type " & obElement.Type & " created."

	''>> The codeline below will set defaults to elements when they are created.
	'obMpElem.SetDefault obElement
	''>> The Defaultsettings are located in the classmodule "CD_ManipulationElement"
End Sub

See Also

ZenWorkspace, Element