Losing Links

GoDiagram (6 and previous)
1

what is the best way to keep the links connected when I “explode” a node

Thanks,
Before Ungrouping of GoMyNode
After Ungrouping of MyGoNode
My explode node function:

Public Sub ExplodeGoNode(ByVal View As Draw.GoDrawView)<?:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

View.StartTransaction()

Dim temp As GoObject

Dim oCol As New GoCollection

temp = View.Selection.Primary

If Not temp Is Nothing Then

If TypeOf temp Is GoMyNode Then

Dim osg As GoMyNode = CType(temp, GoMyNode)

For Each o As GoObject In osg

oCol.Add(o)

Next

For Each o As GoObject In oCol

osg.Remove(o)

o.Selectable = True

View.Document.DefaultLayer.Add(o)

View.Selection.Add(o)

Next

If Not osg Is Nothing Then osg.Remove()

End If

End If

View.FinishTransaction("Ungroup Symbol")

End Sub

2

Use GoLayer.AddCollection to ungroup to top-level objects.
Use GoGroup.AddCollection to add to an existing group (i.e. not to top-level).

I believe Demo1 demonstrates how to group and ungroup.

3

thanks walter - got it working