2013-09-21 明经 AutoLISP 编程(102918348) 群聊记录：说清清楚一些 最后的一个添加是啥意思? 在最后一个点 添加一节线进去？

明经快报

[【KAIXIN】] [【KAIXIN】]炫翔 08:53:50

说清清楚一些
最后的一个添加是啥意思?
在最后一个点 添加一节线进去？

[pzweng][pzweng]路人 08:54:12

请教一个问题

画好的图元怎么加入块中

[【KAIXIN】] [【KAIXIN】]炫翔 08:57:13

这个问题 我昨天遇到了

你想在已知块中加入图元？

[pzweng][pzweng]路人 08:57:26

图元可以是块

嗯

比如我有个块A

[q3_2006]q2 08:58:39

[@20787433,@[pzweng]路人]

[pzweng][pzweng]路人 08:58:51

嗯

[q3_2006]q2 08:59:17

看不见吗。。

[pzweng][pzweng]路人 08:59:21

这个？

[q3_2006]q2 08:59:43

群共享

[pzweng][pzweng]路人 08:59:49

这个我下不了

你能传给我吗

我们公司网络限制了

谢谢

好东西

帮个忙

[q3_2006]q2 09:00:21

[pzweng][pzweng]路人 09:00:25

我在论坛搜了半天

多谢

[【KAIXIN】] [【KAIXIN】]炫翔 09:00:32

这个LEE的作品?

[pzweng][pzweng]路人 09:00:40

LM的呀

[【KAIXIN】] [【KAIXIN】]炫翔 09:00:53

删除的我倒是知道

[pzweng][pzweng]路人 09:00:59

我正准备去他的网站找呢

删除的怎么弄

[【KAIXIN】] [【KAIXIN】]炫翔 09:01:12

新建的 有思路 应该没有这样好

[q3_2006]q2 09:01:15

lee

[pzweng][pzweng]路人 09:01:17

entdel?

[q3_2006]q2 09:01:40

不要断章

[【KAIXIN】] [【KAIXIN】]炫翔 09:02:01

加入图元的 应该也是重定义块弄的

[pzweng][pzweng]路人 09:02:37

我只知道vla-add block......

开心你说的删块内图元怎么弄

是不是遍历块

有例子吗

[【KAIXIN】] [【KAIXIN】]炫翔 09:04:53

刚刚那个里面应该有

晓东论坛也有讲到

[pzweng][pzweng]路人 09:05:02

我看看

[【KAIXIN】] [【KAIXIN】]炫翔 09:05:08

VLA-DE....

[pzweng][pzweng]路人 09:05:25

我找找函数

[【KAIXIN】] [【KAIXIN】]炫翔 09:05:28

vla-delete

[qqimg]201309/{9C2401DB-E840-8256-D573-6FC9958A7A90}.jpg[/qqimg]

[pzweng][pzweng]路人 09:05:49

(setq en (Nentsel "选取"))这里选取块内图元

[【KAIXIN】] [【KAIXIN】]炫翔 09:05:59

主要是这个函数nentsel

[pzweng][pzweng]路人 09:06:02

我先试试

[pzweng][pzweng]路人 09:07:42

可以呀

我用entdel却不行

[pzweng][pzweng]路人 09:08:28

entdel怎么会不行呢

[【KAIXIN】] [【KAIXIN】]炫翔 09:10:13

你仔细看看

[【KAIXIN】] [【KAIXIN】]炫翔 09:11:49

这里是删除

[pzweng][pzweng]路人 09:12:02

我是这样的

[【KAIXIN】] [【KAIXIN】]炫翔 09:12:05

[qqimg]201309/{448499CF-14E1-734E-BF1C-37D9CB1AE580}.jpg[/qqimg]

你用删除命令也可以

[pzweng][pzweng]路人 09:12:28

(setq en(nentsel))
(entdel (car en))

我插入一个块A后，在其周边画好其它图元（图元里可能有块)，然后一次性将画好的图加入A块中

[浮世小半生]X 09:12:31

cui里面就可以增加啊

想添加什么菜单

[pzweng][pzweng]路人 09:12:31

开心

[【KAIXIN】] [【KAIXIN】]炫翔 09:12:31

(car ent)返回的是一个对象

[pzweng][pzweng]路人 09:12:41

你看看我的

[【KAIXIN】] [【KAIXIN】]炫翔 09:12:49

不是纯图元名

[【KAIXIN】] [【KAIXIN】]炫翔 09:14:27

你试试 (CAR(ENTSEL))

[q3_2006]q2 09:14:52

这个好说。。源泉bbE

[pzweng][pzweng]路人 09:15:13

我在看lee的程序

这个够我研究的了

[【KAIXIN】] [【KAIXIN】]炫翔 09:16:24

entdel 也许只能这个对纯图元

[pzweng][pzweng]路人 09:17:44

不知道

理论上应该也可以的

除了块中的图元，其它都可以用entdel

[【KAIXIN】] [【KAIXIN】]炫翔 09:19:39

嗯

每一次不是两图元名吗？

[pzweng][pzweng]路人 09:20:10

最后一个图元是块

[【KAIXIN】] [【KAIXIN】]炫翔 09:20:33

也许是这个问题

[pzweng][pzweng]路人 09:20:52

lee的程序看起来都得费心

神人

[【KAIXIN】] [【KAIXIN】]炫翔 09:22:02

注释太少  看起来很费劲

[pzweng][pzweng]路人 09:22:15

慢慢看就会了

一下子很难看明白的

[【KAIXIN】] [【KAIXIN】]炫翔 09:22:30

纯LISP还勉强 VL VLA VLAX的综合 看起来要点精力

[pzweng][pzweng]路人 09:22:42

他的写法与我们不同

[【KAIXIN】] [【KAIXIN】]炫翔 09:22:47

看懂思路就行

没必要一一消化

[pzweng][pzweng]路人 09:23:04

你看这些

[【KAIXIN】] [【KAIXIN】]炫翔 09:23:26

这个是判断是否是块

[pzweng][pzweng]路人 09:23:48

是

他的写法很另类

(defun LM:SelectIf (msg pred func keyw / sel)

[【KAIXIN】] [【KAIXIN】]炫翔 09:25:36

[pzweng][pzweng]路人 09:26:16

func=entsel

明经快报

梦中的情话 12:06:36

我想让 CAD 里的某几处文字 任何时候能够同步更新，（就是修改他们其中任何一处，被关联的其他几处同步自动修改）。 求帮助啊！！

[xzz007][xzz007]lisp编程 12:10:25

只有使用反应器了

梦中的情话 12:10:49

？

能 详细点吗？

我菜鸟

明经快报

[pzweng][pzweng]路人 12:25:05

改好名字

明经快报

[【KAIXIN】] [【KAIXIN】]炫翔 13:36:12

也许可以SSGET "X"

明经快报

[328302216][328302216]小莫 15:25:13

("TEXT01" "COMBO01" "TEXT02" "TEXT03" "COMBO02" "TEXT04" "TEXT05" "COMBO03" "TEXT06")
变成
("TEXT01_bak" "COMBO01_bak" "TEXT02_bak" "TEXT03_bak" "COMBO02_bak" "TEXT04_bak" "TEXT05_bak" "COMBO03_bak" "TEXT06_bak")怎么弄？

[328302216][328302216]小莫 15:25:43

就是列表里面的每一个字符串都加一个_bak

[328302216][328302216]小莫 15:26:52

mapcar   lambda  这函数实在不懂

[328302216][328302216]小莫 15:28:48

谢谢[@23637935,@[vormittag]桔子]

明经快报

[不死猫][nonsmall]不死猫 20:25:30

等会上课

明经快报

[alwtyp][alwtyp] 20:51:26

  

光辉岁月 20:51:43

明经快报

光辉岁月 21:26:54

想学编程不知道从哪学起。

有愿意做老师的吗？

[VBALISPER]恐龙 21:27:20

从0学起

光辉岁月 21:27:45

是的

[caoyin][caoyin] 21:29:22

[qqimg]201309/{FFF4CB2F-E26C-0EA6-3D04-5D99C24ADD88}.jpg[/qqimg]