张大锤 发表于 2018-6-25 16:08:42

"layout" 切换图面问题

请问各位我先使用 (command "layout" "s" "1loupingmiantu") 插入一个块
再(command "layout" "s" "Model")跳回默认作图界面

屏幕会闪一下 请问有什么办法 不去切换 但另一个图面会插入完块


masterlong 发表于 2018-6-28 23:01:21

SY参数未定义或者漏了双引号

张大锤 发表于 2018-6-26 16:03:12

namezg 发表于 2018-6-26 09:33
不用切换空间，用entmake生成块参照。
(entmake
      (list


实在抱歉朋友 请问一下 10 这里要什么格式？


(10 307.984 123.216 0.0)这是我想插入的位置



(setq pw1(42427.6 -3914.69 0.0))
(entmake
      (list
                '(0 . "INSERT")
                (cons 410 SYOUGOUZU)
                (cons 2 KAI3H)
                (cons 10 pw1)
      )
)

张大锤 发表于 2018-6-28 16:07:42

edata 发表于 2018-6-28 12:35
(10 10 307.984 123.216 0.0)>
你这里多了一个10
(defun c:kai3()
(command "-insert" "KAI3" pause "" "" pause)
(setvar "osmode" 0)
(setq pw1 '(307.984 123.216 0.0))
(entmake (list '(0 . "INSERT") '(100 . "AcDbEntity") '(100 . "AcDbBlockReference") (cons 10 pw1)
(cons 2 KAI3H) (cons 410 SYOUGOUZU)))
(setvar "osmode" 695)
(princ)
)

提示错误：
; ----- Error around expression -----
(CONS 410 SYOUGOUZU)
;
; error : bad argument type <(2)> ; expected <STRING> at
:

大佬能帮忙看看吗？    410这里写法不对吗？

evayleung 发表于 2018-6-25 17:06:30

我也不懂，等高手支招

namezg 发表于 2018-6-26 09:33:14

本帖最后由 namezg 于 2018-6-26 09:34 编辑

不用切换空间，用entmake生成块参照。
(entmake
      (list
                '(0 . "INSERT")
                (cons 410 LayoutName);布局名
                (cons 2 BlockName);块名
                (cons 10 InsertionPoint);插入点（在 OCS 中）
      )
)

张大锤 发表于 2018-6-26 10:53:29

namezg 发表于 2018-6-26 09:33
不用切换空间，用entmake生成块参照。
(entmake
      (list


先感谢
再次被(entmake 打击一下 哈哈 的确比command 强太多了

自贡黄明儒 发表于 2018-6-26 18:57:39

(setq pw1 '(42427.6 -3914.69 0.0))

张大锤 发表于 2018-6-27 08:42:33

自贡黄明儒 发表于 2018-6-26 18:57
(setq pw1 '(42427.6 -3914.69 0.0))

晕 差个点。。。

张大锤 发表于 2018-6-27 09:37:22

o(︶︿︶)o 唉 还是创建不出来


; error : bad argument type <(10 10 307.984 123.216 0.0)> ; expected <LIST> at

edata 发表于 2018-6-28 12:35:24

(10 10 307.984 123.216 0.0)>
你这里多了一个10
页: [1] 2
查看完整版本: "layout" 切换图面问题