设置MLeader的文字的方向
Setting the direction of the MLeader text问题:不管如何创建MLeader实体,文字总是在一边,如果做才能和ACAD生成MLeader实体一样?
解决方法:
Based on the inclination of the leader line, the “SetDogLeg” method can be used to specify the direction in which the MLeader text should appear.
Dim activeDoc As Document = Application.DocumentManager.MdiActiveDocument
Dim db As Database = activeDoc.Database
Dim ed As Editor = activeDoc.Editor
Dim ppr1 As PromptPointResult = ed.GetPoint(vbLf & "Specify leaderarrowhead location")
If ppr1.Status <> PromptStatus.OK Then
Return
End If
Dim startPoint As Point3d = ppr1.Value
Dim ppo As New PromptPointOptions(vbLf & "Specify leader landing location")
ppo.BasePoint = startPoint
ppo.UseBasePoint = True
Dim ppr2 As PromptPointResult = ed.GetPoint(ppo)
If ppr2.Status <> PromptStatus.OK Then
Return
End If
Dim endPoint As Point3d = ppr2.Value
Dim blockText As String = "Autodesk"
**** Hidden Message *****
学习一下,谢谢 谢谢分享,学习一下 回复学习学习,谢谢分享 学习以下,感谢分享 感谢分享 学习学习
页:
[1]