Description
This enables or disables the Child Mode for Edit window Markings. If enabled and something is marked, any children commands related to the parent command is also marked.
Property type
Read-write property
Syntax
| Visual Basic |
|---|
Public Property MarkChildMode As Boolean |
Example
 Copy Code | |
|---|---|
Attribute VB_Name = "mainMod" Global gPCDApp As PCDLRN.Application Global gPCDPart As PCDLRN.PartProgram Public Sub Main() Set gPCDApp = CreateObject("PCDLRN.Application") If (Not gPCDApp Is Nothing) Then Set gPCDPart = gPCDApp.ActivePartProgram If (Not gPCDPart Is Nothing) Then Debug.Print gPCDPart.MarkChildMode, gPCDPart.MarkParentMode, gPCDPart.MarkNewAlignmentMode gPCDPart.MarkChildMode = Not gPCDPart.MarkChildMode gPCDPart.MarkParentMode = Not gPCDPart.MarkParentMode If (gPCDPart.MarkNewAlignmentMode = ENUM_MARK_NEW_ALIGNMENT_MODE.NEWALIGN) Then gPCDPart.MarkNewAlignmentMode = ENUM_MARK_NEW_ALIGNMENT_MODE.SAMEALIGN Else gPCDPart.MarkNewAlignmentMode = ENUM_MARK_NEW_ALIGNMENT_MODE.NEWALIGN End If Set gPCDPart = Nothing End If Set gPCDApp = Nothing End If End Sub | |