2013-09-23 明经 AutoLISP 编程(102918348) 群聊记录：上面几行，应该放在搜索页面

明经快报

[h2o] 10:26:48

上面几行，应该放在搜索页面

davide 10:32:01

(defun c:tt1()
(setq obj (vlax-ename->vla-object (entlast)))
      (setq
        ros (vlax-variant-value (vla-GetDynamicBlockProperties obj))
      )
      (setq oSBProperty (vlax-safearray-get-element ros 0))  ;;;起始为0，+2为下一属性值，以此类推
      (vla-put-value
        oSBProperty
        (vlax-make-variant
          200.0                                                                       ;;;修改的值
          (vlax-variant-type (vla-get-value oSBProperty))
        )
      )
)

这个可以修改动态块属性   谁知道翻转之类的怎么改？

明经快报

[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

方法在上面了，怎么获得图层名自己改改

明经快报

[亮]123379932 11:34:03

vb.net 里面有没有靶框拾取对象事件

[亮]123379932 11:35:39

大侠呢

[野狼谷]笨鸟 11:43:28

幸福的像花一样，花的像幸福一样！

明经快报

[no13bus]13公交车 17:19:05

[qqimg]201309/{E0B63133-D3D3-70BB-35C0-373254FD4DBE}.jpg[/qqimg]

(setq pts (get-pline-point (car (entsel))))
   (setq ssObjects (ssget "_CP" pts)) ; 创建选择集 ssObjects

[no13bus]13公交车 17:23:27

这样的代码为啥选择选择不上图元

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

re一下

明经快报

[野狼谷]笨鸟 20:40:30

ssget "_CP" pts
应该不用_

明经快报

[丽丽星空] 21:30:07

我的CAD出现了问题，现在用命令不会搜索文件夹插入块，而是弹出插入块的对话框，怎么回事？是哪里设置问题？

[tiyi8888]永远D痛 21:31:23

-。

-.

[pzweng][pzweng]路人 21:31:52

有一个系统变量

不过忘了

你自己一个一个查去吧

[丽丽星空] 21:40:05

如同大海捞针

[丽丽星空] 21:42:18

[qqimg]201309/{14D392E8-0849-6FD6-DB84-1CC6C5391CD8}.jpg[/qqimg]这个不可选？

明经快报

[邹锋]Tony 22:22:59

表中有多少个元素用哪个函数

[pzweng][pzweng]路人 22:26:38

length