Sub SetAllAroundThisSide( _
   ByVal AllAroundTS As System.Boolean _
) 

Dim instance As IGtol
Dim AllAroundTS As System.Boolean
 
instance.SetAllAroundThisSide(AllAroundTS)

void SetAllAroundThisSide( 
   System.bool AllAroundTS
)

void SetAllAroundThisSide( 
&   System.bool AllAroundTS
) 

Parameters

AllAroundTS

True to use an All Around 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
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.SetAllAroundThisSide 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. To create bent, perpendicular, and multi-jog leaders, use IAnnotation::SetLeader3.

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.