2013-06-22 明经 AutoLISP 编程(102918348) 群聊记录：请问一下，把p1点增加到已有list里的后面，用那个函数?

明经快报

[kwok][kwok]巭隼 13:22:15

请问一下，把p1点增加到已有list里的后面，用那个函数?

[286168051]勤龙 13:22:37

append

[kwok][kwok]巭隼 13:23:48

这个不是合并表吗，也可以单加?

[mmh1]漫步地球 13:24:44

cons

明经快报

[野狼谷]笨鸟 13:39:33

也可以（append list （list p1））

（append list1 （list p1））

明经快报

慧丫 14:33:38

娱乐把妹赚钱全不误
Q群:277769874 加群验证码:666
精彩内容，与你分享
进群记得输入验证码哦
 我听见爱情，我相信爱情。

[mitenickevin]kevin 14:38:57

[qqimg]oldimg/{FB916235-0EBB-F3B5-F7FA-E40561352653}.gif[/qqimg]

[1993063][1993063] 14:42:02

[qqimg]oldimg/{FB916235-0EBB-F3B5-F7FA-E40561352653}.gif[/qqimg]

明经快报

[mccad][MCCAD] 16:18:29

T

[fsxm]飞诗 16:23:49

看啥多了中毒了

[pzweng][pzweng]路人 16:30:53

能否对组合的PDF文档某个页面进行替换吗

明经快报

[雨的节奏][雨的节奏] 17:15:45

pat文件怎么写啊、、

看半天看不明白、、

就是自定义填充图案、、

[mitenickevin]kevin 17:18:31

[qqimg]oldimg/{021D1497-9795-90A4-A85C-8D11224EE81D}.jpg[/qqimg]可以。用Adobe Acrobat系列的就可以了

[mitenickevin]kevin 17:19:40

填充文件用工具生成吧。你可以看看源泉建筑

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

替换某个页面行吗

Adobe Acrobat根本没有法替换

[mitenickevin]kevin 17:27:45

[qqimg]oldimg/{CDDEA1F9-3D64-68B2-F90F-5ABC471F33FF}.jpg[/qqimg][qqimg]oldimg/{CDDEA1F9-3D64-68B2-F90F-5ABC471F33FF}.jpg[/qqimg]

选择一个右键就可以替换了。我的是９.０

明经快报

[q530496591][q530496591]小菜鸟 18:53:22

(vl-cmdf "stretch" (ssget) ""(getpoint " 请指定拉伸点") (getreal " 请输入拉伸距离") "")

哪里错了呢？

2维的！

LSP爱好者 18:54:34

你这是什么啊

[q530496591][q530496591]小菜鸟 18:54:50

[qqimg]oldimg/{3B6260FF-C1D5-0AB0-C22C-421843E091B8}.gif[/qqimg]拉伸

LSP爱好者 18:55:13

群里传的不是有吗

[q530496591][q530496591]小菜鸟 18:55:48

小菜嘛我在明经上也找到了

[qqimg]oldimg/{C7334598-AEE0-87F5-2CF1-A1C084ED0902}.jpg[/qqimg]

[HNFSF](看海) 18:56:52

getpoint支持输入数字

[q530496591][q530496591]小菜鸟 18:57:28

要关键字么？

LSP爱好者 18:57:56

是记忆拉伸吧  还能带捕捉点拉伸

[HNFSF](看海) 18:58:19

(initget 128)
(getpoint)

运行这个就知道了

[q530496591][q530496591]小菜鸟 18:59:22

(defun c:tt ()
  (initget 128)
  (vl-cmdf ".stretch" (ssget) ""(getpoint " 请指定拉伸点") (getpoint " 请指定拉伸点") "")
)

还是不行

[HNFSF](看海) 19:06:10

可以啊

[q530496591][q530496591]小菜鸟 19:07:03

[qqimg]oldimg/{9D69F4FE-0DC1-AFC4-107B-1E844021F630}.jpg[/qqimg]

[kwok][kwok]巭隼 19:11:28

记忆拉伸，可以捕捉点
试试这么
(defun c:tt5(/ pt aa);;;;这个可以输入也可以鼠标用
   (command ".STRETCH" (ssget) "")
   (command (setq pt (getpoint " 指定基点:")))
(IF (NULL *aa*) (setq *aa* 100))
   (setq aa (getdist pt (strcat " 值:")))
   (if (NULL aa) (setq aa *aa*) (SETQ *aa* aa))
  (command aa)
  (princ)
)

[kwok][kwok]巭隼 19:13:35

上面那个可以输入数值，也可以直接拉伸到捕捉点

明经快报

[q530496591][q530496591]小菜鸟 19:44:37

谢谢！

LSP爱好者 19:48:10

 找了N天了

LSP爱好者 19:49:40

移动的也有吗 大侠

[kwok][kwok]巭隼 19:50:14

改一下拉伸为移动试试

.STRETCH=>.move

LSP爱好者 19:51:27

我试试看  要是可以的话 完全可以替代掉原来CAD的拉伸 移动命令

LSP爱好者 19:55:17

太牛逼了 大侠 向你致敬

明经快报

LSP爱好者 20:32:26

倒角可以框选  有这样的LSP不

[HNFSF](看海) 20:35:28

有，明经搜

LSP爱好者 20:36:07

好的  我现在去看看

明经快报

LSP爱好者 20:59:31

我想问框选倒角   是那种 框选第一根线   然后框选另外一根线 就倒角了

[ZZXXQQ] 21:01:00

那和点选有何不同？

LSP爱好者 21:03:07

点选 没框选快啊  点选拾取框小   要是一次框选两根线的话 图上线条太多  施工图的图面上线比较多  所以我才想出来这样的

[ZZXXQQ] 21:04:33

可框选要点两个点才能选取一个线条，效率低多了

LSP爱好者 21:06:13

[qqimg]oldimg/{A4437A94-0EF0-782A-16B5-9963EED875A5}.jpg[/qqimg]

LSP爱好者 21:06:43

就跟这图上线多 图层多的画  一次狂两根线 不是很方面的

LSP爱好者 21:07:42

也就是在原倒角的基础上增加可以框选的每根线   想点也可以 想框也可以

LSP爱好者 21:09:24

[qqimg]oldimg/{237407C2-FF05-54C7-9B59-E66B0AFB80B8}.jpg[/qqimg]

[qqimg]oldimg/{5E818BA8-A26D-D843-0697-753D30B9922C}.jpg[/qqimg]

就能变成这样

LSP爱好者 21:10:30

[qqimg]oldimg/{4D98636F-41FB-A520-06DC-1243928A75C0}.jpg[/qqimg]

[qqimg]oldimg/{9131F431-C2FF-577E-24AC-BB148E494765}.jpg[/qqimg]

LSP爱好者 21:11:14

框这部分就变成这  框的比点的稍微快点

[kwok][kwok]巭隼 21:12:00

你把点选 的框设大点不就行了，

[qqimg]oldimg/{1B199C0B-1FB6-3B66-29B7-32323C8AF099}.jpg[/qqimg]

LSP爱好者 21:14:03

大了不行的  你不可能为了一个倒角命令 把拾取框变的很大的  因为你还要用其他的 移动 拉伸  文字编辑命令的 拉了 有时候也是不方面的  我试过

LSP爱好者 21:16:46

网上的是框选两根线倒角  但是倒角后是不是你想要的结果呢[qqimg]oldimg/{5E818BA8-A26D-D843-0697-753D30B9922C}.jpg[/qqimg][qqimg]oldimg/{9131F431-C2FF-577E-24AC-BB148E494765}.jpg[/qqimg]

LSP爱好者 21:17:23

可能会出现这两种结果

[kwok][kwok]巭隼 21:17:43

不可以，你选要要留那边

不可能随便选，就知道你要剪那边

LSP爱好者 21:20:22

恩  框选要留那边   就像我传的第一张图样 图面线条很多  即使你单显图层的话  一个图层上的线还是很多   而且你还执行了淡显命令这个环节  然后再全部显示   所以用起来还不如原命令的好用

LSP爱好者 21:22:41

单显图层 然后在  全部显示  还有个过程  两根线要是离的比较远 中间又隔了好几根线的  这样就更不能用了

LSP爱好者 21:24:36

[qqimg]oldimg/{237407C2-FF05-54C7-9B59-E66B0AFB80B8}.jpg[/qqimg][qqimg]oldimg/{4D98636F-41FB-A520-06DC-1243928A75C0}.jpg[/qqimg]这样的框选还是比较合理的 网上是没有找到  你框的那一部分就是默认要保留的部分

LSP爱好者 21:27:21

希望群里大侠们看看这种问题能解决不？

[仲文玉][仲文玉]wygjx 21:32:48

自己学着谢谢

写写

明经快报

[OWEN7]ya雀无声 22:30:50

[qqimg]oldimg/{C637995D-F779-1C12-5199-42DE4D71A67D}.jpg[/qqimg]

这是什么意思，没有错误，但提示很奇怪

[ZZXXQQ] 22:31:43

递归了？

[OWEN7]ya雀无声 22:32:06

[qqimg]oldimg/{47FC372E-1175-3A55-4307-0A4A714AF241}.jpg[/qqimg]

没用啊，

没有啊

奇怪

F9找不到问题

[ZZXXQQ] 22:32:55

对话框？

[OWEN7]ya雀无声 22:33:02

嗯，

OPEN

[OWEN7]ya雀无声 22:34:24

OPEN就是很奇怪

[q530496591][q530496591]小菜鸟 22:42:08

来个简短版的。但是不对

[ntyks]闲人一个 22:46:07

坛子里有个EXCEL转CAD的

谁能帮我下载个

没币了

[OWEN7]ya雀无声 22:46:23

TSSD完美搞定

[lisp-study]jun 22:47:14

[OWEN7]ya雀无声 22:48:57

[qqimg]oldimg/{CFD53901-CD49-ABCB-3168-10D296B5C947}.jpg[/qqimg]

点击确定后 回调2次