BCOUNT-动态块
如果我单独做，我可以数出我的积木。如果是动态块，怎么数你的块呢？**** Hidden Message ***** 这是其中一位“迟到者”的一半答案...
(if names
(progn
(setq names (acad_strlsort names)
names (reverse names)
)
(mapcar '(lambda (x)
(mapcar '(lambda (y)
(if (= (vla-get-effectivename y) x)
(setq lst (cons y lst))
)
)
ss
)
(if lst
(setq str (strcat "\n"
x
" ........... "
(itoa (length lst))
str
)
lst nil
)
)
)
names
)
(princ str)
)
)
)
(princ "\nNo blocks...")
)
(princ)
)
对不起，我不确定你的帖子...
这是如何工作的
请解释...谢谢 *在不知道如何处理简单的lsp例程的情况下，避免评论海报的智能性。*
*编辑*
哎呀。
就像我上面的帖子说...这只是工作例行程序的一半。在你愚蠢的CTB\STB评论之后...我更有动力取笑你，而不是提供帮助。 好了，够暖了，我们不要再煽风点火了。
做。 ：kewl： 谢谢罗恩。 有线电视机顶盒只是我的咆哮..这就是为什么我把它贴在“咆哮”的帖子上...来发泄。但是不要把它当成私人恩怨。我不敢相信有人会有那样的反应。难以置信！
猜想它一定只是我们所有人的迟钝。
页:
[1]
2