123

luoms2008 · 发表于 2025-7-16 15:16:01

本帖最后由 luoms2008 于 2025-7-18 13:59 编辑

1233211112

xiao1984 · 发表于 2025-7-16 15:48:31

本帖最后由 xiao1984 于 2025-7-16 15:53 编辑

只有一个参数没必要用面板输入吧！

luoms2008 · 发表于 2025-7-16 16:14:32

xiao1984 发表于 2025-7-16 15:48
只有一个参数没必要用面板输入吧！

是想(setq p3 (getcorner p1 "\n请选择右下角点<退出>:"))
内能加可以手动输入外框尺寸像这样
(setq p3 (getcorner p1 "\n请选择右下角点或者输入外框尺寸：长/宽<退出>:")，
或者左点之后下一步到“输入外框尺寸：长/宽<退出>:"也行，里面肯定要加不少东西，对我来说难度太大
然后在
;;;;;;;;;柜体下端宽侧板绘制
  (setq xckp1 (polar ckp2 (* pi 0.5) 80 ))
  (setq xckp3 (polar ckp4 (* pi 0.5) 80 ))
  (command "line" xckp1 xckp3 "")再加一条线，线以80加上BH，或者说
（command "line" xckp1 xckp3 "")画线之后再向上偏移一条线，偏移变量以BH为准

xiao1984 · 发表于 2025-7-16 21:22:44

本帖最后由 xiao1984 于 2025-7-17 09:09 编辑

luoms2008 发表于 2025-7-16 16:14
是想(setq p3 (getcorner p1 "\n请选择右下角点:"))
内能加可以手动输入外框尺寸像这样
(setq p3 (getc ...

这样吗？

luoms2008 · 发表于 2025-7-17 07:42:30

xiao1984 发表于 2025-7-16 21:22
这样吗？

是的大佬

zmzk · 发表于 2025-10-3 19:29:25

xiao1984 发表于 2025-7-16 21:22
这样吗？

好用，对话框很明了！

账号		自动登录	找回密码
密码			注册

123

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源