cyh3278 发表于 2003-5-28 21:28:00

龙龙仔,帮我看看这个程序。

这是滚花头手旋螺钉程序,问题是当我画出第一个图形时,下一次调用该程序时,画出下一个图形,如果旋转该图形,则上一次画的图形也会跟着一起旋转,这是为什么?

龙龙仔 发表于 2003-5-29 12:49:00

同理其它错误请自行修改正

……………………………………………
            (SUB_CHK_LAYER)
       (CEN)
       (setq CL1 (entlast))
       (command "line" PO1 PO2 "")
       (STR)
       (command "pline" P1 P3 P5 P7 P8 P6 P4 P2 "c")
            ………………………………………………………..

            …………………………………..
         (setq SS (ssadd))
       (while        (/= NIL (entnext CL1))
           (setq CL1 (entnext CL1))
           (ssadd CL1 SS)
       )
         ……………………………………………..

同理其它错误请自行修改正

cyh3278 发表于 2003-5-29 14:40:00

错误找到了,谢谢!

我把程序好好看了一遍,原来少了一行(setq SS (ssadd))
谢谢你的解答!
页: [1]
查看完整版本: 龙龙仔,帮我看看这个程序。