Angle between two points

Angle between two points

Anonymous
Not applicable
453 Views
5 Replies
Message 1 of 6

Angle between two points

Anonymous
Not applicable
Hi all,

Is it possible to find the angle between two user selected points? If so,
can someone point me in the right direction. I have no idea where to begin!

TIA,

Rob
0 Likes
454 Views
5 Replies
Replies (5)
Message 2 of 6

Anonymous
Not applicable
Hi,

You can not compute an angle between 2 points. Can you clarify what you want
to do ?

Luc Morrissette,
Flairbase inc.

"Rob Outman" wrote in message
news:FD0107F1FDBD06F9676594F5E326E170@in.WebX.maYIadrTaRb...
> Hi all,
>
> Is it possible to find the angle between two user selected points? If so,
> can someone point me in the right direction. I have no idea where to
begin!
>
> TIA,
>
> Rob
>
>
0 Likes
Message 3 of 6

Anonymous
Not applicable
Check out the AngleFromXAxis method of the AcadUtility class.

--
http://www.acadx.com

Good judgement comes from experience.
Experience comes from bad judgement.


"Rob Outman" wrote in message
news:FD0107F1FDBD06F9676594F5E326E170@in.WebX.maYIadrTaRb...
> Hi all,
>
> Is it possible to find the angle between two user selected points? If so,
> can someone point me in the right direction. I have no idea where to
begin!
>
> TIA,
>
> Rob
>
>
0 Likes
Message 4 of 6

Anonymous
Not applicable
Hi Rob

I'm not sure what you like to do, but maybe this function helps you:

Public Function UserAngle(FstPnt As Variant, NxtPnt As Variant) As Double

Dim TmpObj As AcadLine

Set TmpObj = ThisDrawing.ModelSpace.AddLine(FstPnt, NxtPnt)

With TmpObj
UserAngle = TmpObj.Angle
TmpObj.Delete
End With

End Function

Cheers
--
Juerg Menzi
MENZI ENGINEERING GmbH, Switzerland
http://www.menziengineering.ch


Rob Outman schrieb:
>
> Hi all,
>
> Is it possible to find the angle between two user selected points? If so,
> can someone point me in the right direction. I have no idea where to begin!
>
> TIA,
>
> Rob
0 Likes
Message 5 of 6

Anonymous
Not applicable
Hi Rob,

I'm just learning this stuff myself, but try something like this:

pangle = ThisDrawing.Utility.AngleFromXAxis(sp, ep)

Of course, sp is the starting point or point one and ep is the ending point
or the other point.

I think this is what Mr. Oquendo was referring to earlier in the thread.

Sal


"Rob Outman" wrote in message
news:FD0107F1FDBD06F9676594F5E326E170@in.WebX.maYIadrTaRb...
> Hi all,
>
> Is it possible to find the angle between two user selected points? If so,
> can someone point me in the right direction. I have no idea where to
begin!
>
> TIA,
>
> Rob
>
>
0 Likes
Message 6 of 6

Anonymous
Not applicable
Thanx all,

I have used the method described by Jurg for the moment, but I am going to
do some more research into the AngleFromXAxis method mentioned by Frank.

Thanx again,

Rob

"Sal Brusco" wrote in message
news:E8442744501C2C23BB0F05A57140BFC4@in.WebX.maYIadrTaRb...
> Hi Rob,
>
> I'm just learning this stuff myself, but try something like this:
>
> pangle = ThisDrawing.Utility.AngleFromXAxis(sp, ep)
>
> Of course, sp is the starting point or point one and ep is the ending
point
> or the other point.
>
> I think this is what Mr. Oquendo was referring to earlier in the thread.
>
> Sal
>
>
> "Rob Outman" wrote in message
> news:FD0107F1FDBD06F9676594F5E326E170@in.WebX.maYIadrTaRb...
> > Hi all,
> >
> > Is it possible to find the angle between two user selected points? If
so,
> > can someone point me in the right direction. I have no idea where to
> begin!
> >
> > TIA,
> >
> > Rob
> >
> >
>
>
0 Likes