菜鸟求助菜问题！望各位仁兄赐教！

cxzr8

小弟对于LISP还是初学，许多基本的东东还没弄明白。有几个很菜的问题本不好意思提问，但苦于任务紧，一时恐难以搞清楚，小弟只好鼓足了前所未有的勇气,并准备了足够厚的脸皮再次请教，还望各位师兄不要笑掉大牙为好~~~~~~


1 如何在程序中自动选中一个text？就是相当于用拾取框，手工选中一个文本？


2 如何在程序中获得一个text 的插入点并存于变量中？


诚请赐教，不胜感激！！

meflying

1、要自动获取总要有条件的，如果一个图中有TEXT，它不可能知道你需要选择哪一个。如：要使用点'(0 0 0)来选择一个TEXT，可以这样：


(setq ss (ssget pt '((0 . "TEXT"))))


2、如1，如果得到选择集ss，使用ssname得到选择集中的对象名：


(setq ent (ssname ss 0))


获得插入点：(setq pt (cdr (assoc 10 (entget ent))))


以上这些知识是操作CAD对象比较基础的部分，你可以查阅相关资料中CAD对象操作部分内容。