Tharwat 发表于 2022-7-6 11:32:07

 
现在,我很清楚你的观点,但要支持一个直接的价值观,这将迫使我别无选择。
 
因此,Buzzard先生的建议对所有用户都很有帮助和灵活。再加上保存用户输入的最后一个值。
(defun C:DB ()
(or WW (setq WW 4.0))
(setq WW$ (rtos WW 2 1))
(setq WW (cond ((getreaL (strcat "\nSpecify wall width: <"WW$">: ")))(T WW)))
(DB_LINE WW)
(princ))

(defun DB_LINE (WallWidth / Point1 Point2 StartPt Start1 Start2 Line1 Line2 Line3 Line4 Int2 WallLayer WallLine)
 
大家都做得很好。
 
塔瓦特

alanjt 发表于 2022-7-6 11:34:09

我真的很喜欢这个想法,并决定写我自己的。这将使画墙变得轻而易举。
 
我决定让它绘制2条LWPolyline或1条闭合LWPolyline。如您所见,使用grdraw绘制的向量使用为指定层的特性设置的任何颜色。
 

Tharwat 发表于 2022-7-6 11:36:40

太棒了,艾伦,
 
太棒了。
你为什么不和我分享那块蛋糕。。?我确信它是如此的美味。我肯定你同意我的观点。。。。。。。。。。。。。。。
 
我会等一片。。。。。。。。。。。Oki?
 
顺致敬意,
塔瓦特

Tharwat 发表于 2022-7-6 11:41:56

你好
 
这就是我一直在寻找的绘制暖通空调管道,李也有自己的一个,但该计划是专门在暖通空调完全。他说这不是免费软件,所以我保持沉默。
 
那你呢。。。。。。。。。。。。。。。。。?
 
 
塔瓦特

Lee Mac 发表于 2022-7-6 11:44:39

另一个
 

Tharwat 发表于 2022-7-6 11:45:35

嗨,李。
 
谢谢你的表演。
 
塔瓦特

alanjt 发表于 2022-7-6 11:49:28

哈哈,看起来很眼熟。看起来不错。遗憾的是,您失去了所有正常功能(OSNAP等)。见鬼,我在下面使用GrRead的唯一原因是因为我正在捕捉我选择的对象。
 

Lee Mac 发表于 2022-7-6 11:53:04

 
不,它不像你的代码。
 
 
不,你没有,我没有用过grread。

alanjt 发表于 2022-7-6 11:56:37

亚历山大的GrRead替代品?记不起名字或找不到链接。

Lee Mac 发表于 2022-7-6 11:59:40

 
不。。。。。。。。
页: 1 [2]
查看完整版本: 任何绘制线条的函数