chulse 发表于 2022-7-6 11:23:50

没有UCS通信的UCS世界

好的，我从ASMI中找到了这个小宝石（一个可以在文件中完成各种事情的反应堆）。我希望它也能自动将UCS设置为文件关闭时的世界。
如果我正确理解您不能在反应堆中使用“command”（请阅读此处，我对反应堆完全陌生……对lisp几乎完全陌生……），有没有其他方法可以将UCS改变回世界？
 
谢谢

Lee Mac 发表于 2022-7-6 11:43:44

除了创建临时UCS之外，我不确定还有什么其他方法可以做到这一点：
 

(defun UCSWorld (/ doc tmp)
(setq doc (vla-get-ActiveDocument
             (vlax-get-acad-object)))

(vla-put-ActiveUCS doc
   (vla-add (vla-get-usercoordinatesystems doc)
   (vlax-3D-point '(0. 0. 0.))
       (vlax-3D-point '(1. 0. 0.))
         (vlax-3D-point '(0. 1. 0.)) "TempWord_UCS")))

chulse 发表于 2022-7-6 11:46:34

谢谢李！

Lee Mac 发表于 2022-7-6 11:55:15

 
不客气-这不是完美的，还有一点变通方法-我欢迎任何人提交更好的方式。

alanjt 发表于 2022-7-6 12:06:50

谢谢你我会怎么做。
不久前，我用同样的编码做同样的事情。我只是把它叫做“世界”，然后就放在那里了。

Lee Mac 发表于 2022-7-6 12:14:09

 
我想我是从斯旺普的某个地方捡到的——我希望有更好的方法。

alanjt 发表于 2022-7-6 12:24:08

彼此彼此。
页: [1]
查看完整版本: 没有UCS通信的UCS世界