代码生成直线时怎么显示画线时候的引导线

muou8

用VBA或者lisp写生成直线的代码，我想模拟系统直线的方法，在屏幕上选择两点生成直线，下面是VBA的代码Set a = ThisDrawing.ModelSpace.AddLine(ThisDrawing.Utility.GetPoint(, "frist"), ThisDrawing.Utility.GetPoint(, "second"))
lisp的代码差不多


但是CAD原始的生成直线的时候，会有引导线：

所以本人小白，请大神指点下，这个引导线怎么利用代码显示，谢谢。

muou8

没有老师能解答吗？
其实不只是直线，画圆，多段线等等其他的实体，都有引导线。

start4444

(setq pt1 (getpoint "\n指定第一点:"))
(setq pt2 (getpoint pt1 "\n指定第二点:"))

muou8

start4444 发表于 2019-3-9 20:47
(setq pt1 (getpoint "\n指定第一点:"))
(setq pt2 (getpoint pt1 "\n指定第二点:"))

老师  不是要这个代码，我是在说  画利用代码画线的时候没有CAD中直接用L画线的 图片中的引导线，  不知道用代码怎么实现中间那个引导线。

start4444

muou8 发表于 2019-3-9 21:08
老师  不是要这个代码，我是在说  画利用代码画线的时候没有CAD中直接用L画线的 图片中的引导线，  不知 ...

你说的不是第一点和第二点的提示线？

muou8

start4444 发表于 2019-3-9 21:34
你说的不是第一点和第二点的提示线？

图片里面的那条暗的线，使用CAD中的命令L画直线的时候，会让我们先选第一点，然后选第二点，在第二点没有选择的时候，会出现一条暗的引导线。
而利用get点的方法来选，也可以实现先选第一点，在选第二点，但是第一点与第二点之前没有那条暗的线，现在我就需求，怎么能显示这条线，这样用户交互的效果会更好。
谢谢老师解答、

start4444

muou8 发表于 2019-3-9 21:44
图片里面的那条暗的线，使用CAD中的命令L画直线的时候，会让我们先选第一点，然后选第二点，在第二点没有 ...

怎么你不试一下

muou8

start4444 发表于 2019-3-9 22:00
怎么你不试一下

谢谢老师，不好意思了，没有去实验，谢谢您。

muou8

start4444 发表于 2019-3-9 22:00
怎么你不试一下

老师 不好意思还要麻烦您一下， 您知道为什么画圆的时候，CAD会出现圆的形状，而代码实现的时候不会出现？

start4444

muou8 发表于 2019-3-9 22:31
老师 不好意思还要麻烦您一下， 您知道为什么画圆的时候，CAD会出现圆的形状，而代码实现的时候不会出现 ...

用代码都是定点自动生成的啦，如果要看就直接用画圆命令好了