[emk]小8点 10:50:25
请教下,n个bmp图标文件打包成*.dll后,在lsp、dcl中如何调用?
[emk]小8点 10:51:30
n个sld文件打包成*.slb后,在lsp、dcl中如何调用?
前面的说错了
是幻灯片库内的文件调用
[xiaomm250][lisp_](car (entsel)) 11:00:23
如何用lisp把某一个图层弄打开,别的图层全部关闭?也就是图层隔离
davide 11:05:11
网上有的
[cie0588][cie0588] 11:05:19
先把所有图层关闭。再打个某个图层。
[vormittag]桔子 11:12:09
cad自己就有这功能还要开发么?
[阿然][阿然] 11:12:14
(defun c:tt (/ ent layname lays lay)
(if (setq ent (car (entsel "
选择保留的图层:")))
(progn
(setq layname (strcase (cdr (assoc 8 (entget ent)))))
(setq lays (vla-get-layers
(vla-get-ActiveDocument (vlax-get-Acad-Object))
)
)
(vlax-for lay lays
(if (/= (strcase (vla-get-name lay)) layname)
(vla-put-layeron lay :vlax-false)
)
)
)
)
)
[xiaomm250][lisp_](car (entsel)) 11:13:52
我的意思是我把图层名给你,然后你孤立这个图层
[阿然][阿然] 11:15:21
方法在上面了,怎么获得图层名自己改改 |