[求助]：画线提示问题

animal212 · 发表于 2007-10-23 20:45:11

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

CAD调用pline命令时，在每次操作过程中都会提示：
“指定下一点或 [圆弧(A)/闭合(C)/半宽(H)/长度(L)/放弃(U)/宽度(W)]:”
请问选项C＂闭合＂　程序是怎样编写的？　我想应该不是简单的把下一点的坐标赋值为第一点的坐标吧．

firstintimate · 发表于 2007-10-24 11:09:27

"C"

e.g:
(defun c:tt()
(vl-cmdf "pline" (getpoint) (getpoint) (getpoint) "c")
)

carrot1983 · 发表于 2007-10-24 14:36:08

二楼太小看楼主美眉了吧。。。
她应该不会是想要这个答案吧。。。
只是，美女你想要干嘛啊？？

animal212 · 发表于 2007-10-24 19:09:08

哈，还是小萝卜了解啊，
说白了就是要自己定义pline命令，我把我的设计意图给你讲吧，我想通过选择一条线，实现自动重新画所选的线，然后接下去手动画线，画完线后与自动画的线的起点闭合，这样就形成一条闭合曲线。
不过这问题我已经差不多解决了。我是用pedit命令里的闭合选项实现的，程序我已经快写完了。就差一点点。明天再试了。

zml84 · 发表于 2007-10-25 09:07:27

也凑个热闹。
楼主要是不介意的话，将代码贴出来，大家共同帮你改！

animal212 · 发表于 2007-10-25 19:03:43

呵呵，终于编完了。谢谢你们的好意啦。程序放公司里没带回家。

cy956 · 发表于 2007-10-26 01:14:25

被mm忽悠了:D

animal212 · 发表于 2007-10-29 18:54:10

zml84还有小萝卜他们两个可以说是我的授业恩师，在我学lisp的过程中，他们给我很大的帮助，我怎么会忽悠他们呢。

wwddzz · 发表于 2007-10-31 17:06:37

我顶，不错

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

[求助] [求助]：画线提示问题

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子