计数器文本

RMateus · 发表于 2022-7-5 23:33:12

亲爱的朋友们：，
我想学习如何使用autolisp计算图形中的文本（字符串）数量？
顺致敬意，

MSasu · 发表于 2022-7-5 23:39:41

是否还要按条件筛选它们？我的意思是：颜色，层次，内容。。。
要统计所有文本实体，请执行以下操作：
这将在选择中包括多行文字：

(if (setq ssText (ssget "_X" '((0 . "*TEXT"))))
(alert (strcat "This drawing contains " (itoa (sslength ssText)) " text/mtext entities."))
)

Lee Mac · 发表于 2022-7-5 23:45:00

这有帮助吗？

http://lee-mac.com/tcount.html

RMateus · 发表于 2022-7-5 23:47:04

感谢您的快速回复。
我一定做了什么蠢事。
AutoCAD给出了一个错误“错误：错误SSGET列表”
这个代码有什么问题？

copy

(defun c:ntxt ()[font=&quot]
     (if (setq ssText (ssget "_X" '((0 . "*TEXT"))))[/font]  [font=&quot] (alert "This drawing contains " (strcat (itoa (sslength ssText)) " text/mtext entities."))[/font]
 [font=&quot])[/font]
 [font=&quot])[/font]

Tharwat · 发表于 2022-7-5 23:53:33

copy

(alert (strcat "This drawing contains " (itoa (sslength ssText)) " text/mtext entities.")

此外，本地化变量。。

copy

(defun c:ntxt (/ ssText)

RMateus · 发表于 2022-7-5 23:58:10

谢谢李。
这真的很好，但我想学习的是如何像你一样构建代码，这些是帮助我理解其工作原理的小步骤。
我希望以后不要用同样愚蠢的问题来打扰你。
顺致敬意，

Lee Mac · 发表于 2022-7-6 00:02:37

没问题，我钦佩你的学习意愿。

问尽可能多的问题，因为你需要你的理解！

RMateus · 发表于 2022-7-6 00:06:38

好啊
非常感谢。

MSasu · 发表于 2022-7-6 00:11:18

@RMateus：我在粘贴代码后编辑了盘点报告，因此出现了错误。我现在已经修复了我的示例。很抱歉给您带来不便！

CristianG · 发表于 2022-7-6 00:18:47

亲爱的朋友们，我想下载一个命令的lisp例程，它为我提供了相同的tcount函数，而不是按字母顺序计数

[编程交流] 计数器文本

发表回复

精选推荐