GetLine3D not working

[WhoCanDo]

Isn't GetLine3D suppose to pick points from different Z planes?

I have a Locus on Z+200, Z0, Z-200 & X100,Z0

If I run the following macro then I can pick any locus first but no other if I am in any view other than iso and then only the one on the Z0 plane.

Surely I should be able to pick any loci being this is a 3D tool and set to False.

Can anyone suggest a reason for this or a way around this?

procedure test_this;

var p1X, p1Y, p1Z, p2X, p2Y, p2Z : real;

begin

GetLine3D (p1X, p1Y, p1Z, p2X, p2Y, p2Z, false);

Poly3D (p1X, p1Y, p1Z, p2X, p2Y, p2Z);

end;

run (test_this);

[MullinRJ]

Mr. Do,

   Yes, it is broken, or better yet, never worked. I've been playing with it for a day now (since your previous thread) and from VW 2010, when it was introduced, to VW 2015 it never worked. The Z components are always 0. GetPt3D() seems to be equally afflicted.

   To get 3D points interactively try:

*********

procedure Get3DPt(var P :Vector);

Begin

   CallTool(-316); { 3D Locus tool }

   GetLocus3D(LActLayer, P.x, P.y, P.z);

   DelObject(LActLayer);

End;      { Get3DPt }

...

BEGIN

   Get3DPt(P1);

   Get3DPt(P2);

...

*********

This won't give you the rubberband effect of GetLine3D, but it will work with 2 clicks. You can thank Gerard Jonker for suggesting this method years ago.

Raymond