DynPicture.Copy

Copy(PictureSource As DynPicture) As Boolean

Parameters

PictureSource As DynPicture

"DynPicture" object from which the settings should be copied from.

Remarks

Copies the settings of an existing "DynPicture" object to the current object.

Sample

Sub zenOn_CopyDynPicture()
	'Declarations
	Dim zPic As DynPicture
	Dim zPicCopy As DynPicture

	'Initialize zPic with the start picture
	Set zPic = MyWorkspace.ActiveDocument.DynPictures.Item("START")
	'Initialize zPicCopy by creating a new picture linked to template "MAIN_WIZARD" as standard picture type
	Set zPicCopy = MyWorkspace.ActiveDocument.DynPictures.Create("zPicCopy", "MAIN_WIZARD", 0)

	'Copy the settings from zPic to zPicCopy
	zPicCopy.Copy zPic

End Sub

See Also

DynPicture