2013-05-18 明经 AutoLISP 编程②群(177027547) 群聊记录：[image={1D7EC5AE-0AFA-57DD-8929-00B6

明经快报

[【KAIXIN】][【KAIXIN】]炫翔 09:07:09

[qqimg]oldimg/{1D7EC5AE-0AFA-57DD-8929-00B65DFA7FC7}.gif[/qqimg]

明经快报

[toproc]大鹏追日 10:43:40

咨询下大家，用vla-AddLine和用command调用line命令创建直线，在直线很多的情况下，哪个执行效率更高些？

谢谢

[天津]-地形-fly 10:45:05

当然是 vla-

[天津]-地形-fly 10:45:40

或 entmake 都比command 快

[toproc]大鹏追日 10:47:27

谢谢，效率高得明显不？我没做过测试

[【KAIXIN】][【KAIXIN】]炫翔 10:48:04

特别明显

entmake 在新建图元上面 最快

[toproc]大鹏追日 10:48:57

比vla还快？

[【KAIXIN】][【KAIXIN】]炫翔 10:48:59

vla 适合玩属性的提取 修改...

当然

可以测试

[toproc]大鹏追日 10:50:16

恩，回头测试下。

明经快报

漫步苍穹 11:44:24

怎么样能提高lisp程序的运行速度呢

流荧 11:45:18

从程序上讲优化代码

漫步苍穹 11:45:49

我那代码没有办法再优化了

我查构面缝隙

只能逐点查询

明经快报

[toproc]大鹏追日 13:39:01

(entmake (list '(0 . "TEXT")
           (cons 1 (rtos (+ hmin (* hh i)) 2 1))
           '(7 . "XL标尺")
           (cons 10 pt1)
           (cons 40 (/ (* zgbcwz xbl) 1000.0))
           (cons 41 ztgkb)
           (cons 72 2)
           (cons 73 2)
         )
    )

明经快报

找软件高手 17:15:58

谁会控件加密呀

明经快报

[toproc]大鹏追日 20:31:36

(command "style" "XL标尺" "Simkai.ttf" 0 ztgkb 0 "" "" "")

(command "style"      "XL标尺"     "romans.shx,hztxt.shx"
         0          ztgkb           0        ""
         ""          ""
        )

[toproc]大鹏追日 20:32:32

上面语句执行的时候总是在命令栏中显示未知命令，下面的语句执行没问题。我怀疑是与字体有关系，大家对这问题有研究没？

上面的语句后面取消一组 "" 就没问题了

[ZZXXQQ] 20:33:09

对

[toproc]大鹏追日 20:33:43

请问这是什么原因呢？如何避免这个问题？

[ZZXXQQ] 20:35:39

字体本身固有的。可用
(while (> (getvar "CMDACTIVE") 0) (command ""))
加在后面，防止少引号。

[toproc]大鹏追日 20:36:38

哦 明白了 非常感谢！

明经快报

找软件高手 22:00:36

做cad命令控件怎么做呀

明经快报

[toproc]大鹏追日 23:05:23

一次建立20个字体样式，除了采用子函数循环的方式，还有什么简便和效率高的方式么？