Hello,
I have a question about the api for Add Annotation. I'm building a add-in for our company with customized functions. One of the functions is to add an Annotation in a specific layer with a diamond border. When the user selects multiple parts in a assembly drawing, an annotation is made for every part. The only problem is that the annotations have multiple leaders to each of the parts.
Does anybody have a solution for this? This is the code i'm using:
<span style="font-size: 10pt; font-family: Consolas; "><p>iModel = iSwApp.ActiveDoc</p><p>iSwSelmgr = iModel.SelectionManager</p><p></p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">Dim</span><span style="font-size: 10pt; font-family: Consolas; "> sel </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">As</span><span style="font-size: 10pt; font-family: Consolas; "> </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">Boolean</span><span style="font-size: 10pt; font-family: Consolas; "> = </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">False</span><span style="font-size: 10pt; font-family: Consolas; "><p></p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">For</span><span style="font-size: 10pt; font-family: Consolas; "> i = 1 </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">To</span><span style="font-size: 10pt; font-family: Consolas; "> iSwSelmgr.GetSelectedObjectCount</span><span style="font-size: 10pt; font-family: Consolas; "><p></p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">If</span><span style="font-size: 10pt; font-family: Consolas; "> iSwSelmgr.GetSelectedObjectType3(i, -1) = </span><span style="color: #2b91af; font-size: 10pt; font-family: Consolas; ">swSelectType_e</span><span style="font-size: 10pt; font-family: Consolas; ">.swSelEDGES </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">Then</span><span style="font-size: 10pt; font-family: Consolas; "><p>swnote = iModel.IInsertNote(</p><p><span style="color: #a31515; font-size: 10pt; font-family: Consolas; ">"Pxx"</span><span style="font-size: 10pt; font-family: Consolas; ">)</span><span style="font-size: 10pt; font-family: Consolas; "><p>swnote.SetBalloon(</p><p><span style="color: #2b91af; font-size: 10pt; font-family: Consolas; ">swBalloonStyle_e</span><span style="font-size: 10pt; font-family: Consolas; ">.swBS_Diamond, </span><span style="color: #2b91af; font-size: 10pt; font-family: Consolas; ">swBalloonFit_e</span><span style="font-size: 10pt; font-family: Consolas; ">.swBF_Tightest)</span><span style="font-size: 10pt; font-family: Consolas; "><p>iSwannotation = swnote.GetAnnotation</p><p>iSwannotation.Layer =</p><p><span style="color: #a31515; font-size: 10pt; font-family: Consolas; ">"P"</span><span style="font-size: 10pt; font-family: Consolas; "><p>iSwannotation.DeSelect()</p><p>sel =</p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">True</span><span style="font-size: 10pt; font-family: Consolas; "><p></p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">ElseIf</span><span style="font-size: 10pt; font-family: Consolas; "> iSwSelmgr.GetSelectedObjectType3(i, -1) = </span><span style="color: #2b91af; font-size: 10pt; font-family: Consolas; ">swSelectType_e</span><span style="font-size: 10pt; font-family: Consolas; ">.swSelFACES </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">Then</span><span style="font-size: 10pt; font-family: Consolas; "><p>swnote = iModel.IInsertNote(</p><p><span style="color: #a31515; font-size: 10pt; font-family: Consolas; ">"Pxx"</span><span style="font-size: 10pt; font-family: Consolas; ">)</span><span style="font-size: 10pt; font-family: Consolas; "><p>swnote.SetBalloon(</p><p><span style="color: #2b91af; font-size: 10pt; font-family: Consolas; ">swBalloonStyle_e</span><span style="font-size: 10pt; font-family: Consolas; ">.swBS_Diamond, </span><span style="color: #2b91af; font-size: 10pt; font-family: Consolas; ">swBalloonFit_e</span><span style="font-size: 10pt; font-family: Consolas; ">.swBF_Tightest)</span><span style="font-size: 10pt; font-family: Consolas; "><p>iSwannotation = swnote.GetAnnotation</p><p>iSwannotation.Layer =</p><p><span style="color: #a31515; font-size: 10pt; font-family: Consolas; ">"P"</span><span style="font-size: 10pt; font-family: Consolas; "><p>iSwannotation.DeSelect()</p><p>sel =</p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">True</span><span style="font-size: 10pt; font-family: Consolas; "><p></p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">End</span><span style="font-size: 10pt; font-family: Consolas; "> </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">If</span><span style="font-size: 10pt; font-family: Consolas; "><p></p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">Next</span><span style="font-size: 10pt; font-family: Consolas; "><p></p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">If</span><span style="font-size: 10pt; font-family: Consolas; "> sel = </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">False</span><span style="font-size: 10pt; font-family: Consolas; "> </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">Then</span><span style="font-size: 10pt; font-family: Consolas; "><p>iSwApp.SendMsgToUser2(</p><p><span style="color: #a31515; font-size: 10pt; font-family: Consolas; ">"Selecteer eerst een Edge of Face"</span><span style="font-size: 10pt; font-family: Consolas; ">, </span><span style="color: #2b91af; font-size: 10pt; font-family: Consolas; ">swMessageBoxIcon_e</span><span style="font-size: 10pt; font-family: Consolas; ">.swMbWarning, </span><span style="color: #2b91af; font-size: 10pt; font-family: Consolas; ">swMessageBoxBtn_e</span><span style="font-size: 10pt; font-family: Consolas; ">.swMbOk)</span><span style="font-size: 10pt; font-family: Consolas; "><p></p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">End</span><span style="font-size: 10pt; font-family: Consolas; "> </span><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">If</span><span style="font-size: 10pt; font-family: Consolas; "><p>iModel.ClearSelection2(</p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">True</span><span style="font-size: 10pt; font-family: Consolas; ">)</span><span style="font-size: 10pt; font-family: Consolas; "><p>iModel.ForceRebuild3(</p><p><span style="color: #0000ff; font-size: 10pt; font-family: Consolas; ">False</span><span style="font-size: 10pt; font-family: Consolas; ">)</span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span></p></span>
Thanks,
Rody
SolidworksApi macros