还有两个问题。。。我想
当我得到一个3dsolid时,我得到了这个jibberish
+->687+r<*-): {rn rn {rn klqlmfkhhffgkfmjik ikqhimofifkfmfjnff li rn o o V V
|") (1 . "<0:;8: {rn rn {rn {ln {kl {ll {im -:-,:; {nl {rn |") (1 . "):-+:'
{rn rn {rn {jk n {hf |") (1 . ",+->687+r<*-): {rn rn {rn klqlmfkhhffgkfmjik
klqonnjlhfggkllghm li n o o V V |") (1 . ":;8: {rn rn {rn {li rng {jn ng {ll
{go 90-(>-; _h *1410(1 |") (1 . ":;8: {rn rn {rn {lh rng {jo ng {lk {gn 90-(>-;
_h *1410(1 |") (1 . "/061+ {rn rn {rn jjqonimjkgilhhgmnj klqonnjlhfggkllghm li
|") (1 . "/061+ {rn rn {rn jjqonimjkgilhhgmnj ikqhimofifkfmfjnff li |") (1 .
"/3>1:r,*-9><: {rn rn {rn jjqonimjkgilhhgmnj jlqggignhkiggikjlj ng rn o o o o n
90-(>-;@) V V V V |") (1 . "<0:;8: {rn rn {rn {kk {km {ki {hn -:-,:; {mn {rn
|") (1 . ":;8: {rn rn {rn {jh rng {hl ng {ji {gm 90-(>-; _h *1410(1 |") (1 .
"):-+:' {rn rn {rn {hn o {gl |") (1 . ",+->687+r<*-): {rn rn {rn
或
(ssget "_X" '((0 . "TEXT,MTEXT")))
我在这里绊倒了。我试着穿过这个街区,看看它是不是一个三维实体。我已经尝试了这两种方法和其他几种方法。需要一点推动
(ssget "_X" '((0 . "*LINE")))
您无法过滤SelectionSet中的嵌套项,您需要在顶层尽可能多地过滤,然后在块表中迭代块定义以检查其中包含的内容。 对不起,这里有点慢。你有例子吗。
去散步了,我要试试看。我想我明白了 朝正确方向轻推:
(sssetfirst nil (ssget "_X" '((100 . "AcDbBlockReference")(0 . "3DSOLID"))))
(sssetfirst nil (ssget "_X" '((-4 . "<and")(100 . "AcDbBlockReference")(0 . "3DSOLID")(-4 . ">and"))))
Sorry ,a little slow here.Do you have an example.
Went for a walk,I'll take a crack at it.Think I understand A nudge in the right direction:
;; GetSubObjects;; blk = Block Entity Name(defun GetSubObjects ( blk / foo ) ;; © Lee Mac~02.06.10 (defun foo ( ent ) (if (setq ent (entnext ent)) (cons ent (foo ent)) ) ) (if (setq blk (tblobjname "BLOCK" (cdr (assoc 2 (entget blk) ) ) ) ) (foo blk) ))
页:
1
[2]