(按Enter輸入層名)"))) (progn (setq entt (entget ent) lay (ent_code 8 entt) ss (ssget "x" (list (cons 8 lay))) ) (princ (strcat "\n " lay "層 ...
確定! 回上一頁