Leader - 2 Points?

[Anonymous]

Is there a way to create a leader with 2 points instead of three? I just
want a one legged leader.. ------------->

Thanks in advance,
Nate

[Anonymous]

Yes. If you're using the LEADER command, then you simply input two points,
then echo 2 'Enter's and then 'N' or 'None' where it prompts for text. I do
mine with LISP, so no, don't have the VBA code for doing this.

Voila! 2 pt leader.

"Nate" wrote in message
news:EDDE046DBA2ECC27C04A4F12E2224294@in.WebX.maYIadrTaRb...
> Is there a way to create a leader with 2 points instead of three? I just
> want a one legged leader.. ------------->
>
> Thanks in advance,
> Nate
>
>

[Anonymous]

I have my VBA leaders setup similar to what Jason does in LISP.
In VBA I have

ThisDrawing.SendCommand "leader" & vbCr & varStartPoint(0) & "," &
varStartPoint(1) & vbCr & varEndPoint(0) & "," & varEndPoint(1) & vbCr &
vbCr & strMtext & vbCr

Probably is not the most efficient way.

HTH
Bruce

"Nate" wrote in message
news:EDDE046DBA2ECC27C04A4F12E2224294@in.WebX.maYIadrTaRb...
> Is there a way to create a leader with 2 points instead of three? I just
> want a one legged leader.. ------------->
>
> Thanks in advance,
> Nate
>
>

[Anonymous]

Here's how to do it the VBA way.

Joe
--

Dim Annotation As AcadEntity

Dim Points(0 To 5) As Double

Dim StartPoint As Variant

Dim EndPoint As Variant

Dim LeaderType As Integer

Dim Counter As Integer



  LeaderType = acLineWithArrow



  StartPoint = ThisDrawing.Utility.GetPoint(, "Select leader start point: ")

  EndPoint = ThisDrawing.Utility.GetPoint(StartPoint, "Select leader end point: ")

  

  For Counter = 0 To 2

    Points(Counter) = StartPoint(Counter)

  Next Counter

  

  For Counter = 0 To 2

    Points(Counter + 3) = EndPoint(Counter)

  Next Counter

  

  'Create the leader object

  ThisDrawing.ModelSpace.AddLeader Points, Annotation, LeaderType

  Application.Update

[Anonymous]

On Tue, 17 Dec 2002 13:34:36 -0800, "Nate"
wrote:

>Is there a way to create a leader with 2 points instead of three? I just
>want a one legged leader.. ------------->

Are you trying to get rid of the little 'flag' line?
__
^ \
h \
e \
r \|
e -+
?

And be left with:
\
\
\
\|
-+

(please pardon the bad art)