Sub SetAllOverThisSide( _
   ByVal AllOverTS As System.Boolean _
) 

Dim instance As IGtol
Dim AllOverTS As System.Boolean
 
instance.SetAllOverThisSide(AllOverTS)

void SetAllOverThisSide( 
   System.bool AllOverTS
)

void SetAllOverThisSide( 
&   System.bool AllOverTS
) 

Parameters

AllOverTS

True to use an All Over This Side leader, false to not

'VBA Preconditions:

'Open a drawing.

Dim swApp As SldWorks
Dim Part As ModelDoc2
Dim myGtol As Gtol
Dim myAnno As Annotation
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Option Explicit
Sub main()

    Set swApp = Application.SldWorks
    Set Part = swApp.ActiveDoc
    
    Set myGtol = Part.InsertGtol()
    If Not myGtol Is Nothing Then
       myGtol.SetFrameSymbols2 1, "<IGTOL-SPROF>", False, "", False, "", "", "", ""
       myGtol.SetFrameValues 1, ".031265", "", "", "", ""
       myGtol.SetFrameSymbols2 2, "", False, "", False, "", "", "", ""
       myGtol.SetFrameValues 2, "", "", "", "", ""
       myGtol.SetPTZHeight "", False
       myGtol.SetCompositeFrame False
       myGtol.SetText 4, ""
       myGtol.SetBetweenTwoPoints False, "", ""
       myGtol.SetAllOverThisSide True
       Set myAnno = myGtol.GetAnnotation()
       If Not myAnno Is Nothing Then
          boolstatus = myAnno.SetPosition(0.801796955941255, 0.800162656875834, 0)
          longstatus = myAnno.SetLeader3(swLeaderStyle_e.swBENT, 0, True, False, False, False)
       End If
    End If
    Part.WindowRedraw

End Sub 

This property is valid only for bent, perpendicular, and multi-jog leaders.

Use:

• IGtol::IsAttached to determine whether this symbol is currently using a leader.
• IGtol::HasExtraLeader to determine whether this symbol is using a bent leader.
• IGtol::GetLeaderSide to determine where the leader is attached to the symbol.
• IGtol::SetLeader to set the characteristics of the leader on this symbol.