HTH，M.R。
自动标签属性V1-0-解锁图层。lsp
这当然会有帮助。
我想你需要一个例程来填充缺失的数字[超过1个删除的停车位]现有值，你想通过选择来实现吗？
你想让它同时处理文本和属性吗？
编辑：想一想，也许可以根据当前顺序（从第一个空格开始）对选择集重新编号，而无需找出遗漏的内容
1，2，3，5，6，7 10将是1，2，3，4，5，6。7无论如何 哇，那太棒了。。。。
我们可以为地下室1提供B1后缀，为地下室2提供B2后缀，为第一层提供地面1的G后缀等。。。
车辆编号可以是G-1、G-2、G-3、B1-1、B1-2、B2-1、B2-2、1-1、1-2、1-3等。。。。
那真的很重要。。。
否则，您建议使用不同的块运行lisp-carG、carB、car1等将达到效果。。。。。
希望李某个时候读到这篇帖子。。。。。 我很确定你指的是罗布斯的帖子
FWIW，这里有一个简短的代码来演示我在上一篇文章中写的内容
(defun c:bumper (/ ss i e lst start)
(if (setq lst nil
ss (ssget "_:L" '((0 . "TEXT") (1 . "*#*")))
)
(progn
(repeat (setq i (sslength ss))
(setq e (vlax-ename->vla-object (ssname ss (setq i (1- i)))))
(setq lst (cons (list (atoi (vla-get-textstring e)) e) lst))
)
(setq start (apply 'min (mapcar 'car lst)))
(foreach val (vl-sort lst
'(lambda (n m)
(< (car n) (car m))
)
)
(vla-put-textstring (cadr val) (itoa start))
(setq start (1+ start))
)
)
)
)
现在你考虑封盖，这是一场完全不同的球赛。以上演示仅适用于文本实体
尽管提供了许多其他解决方案，但这里是我使用的TextMath lisp。
文本数学。lsp 可能有用的评论可能没有，一些想法如果你使用围栏选项，你可以按要求的顺序选择你的隔间，并一次性自动创建停车场编号B1-B50 ie 50，等等，我建议只需重新编号所有选项，应该工作的一件事是，如果你做选择，文本或块应按创建顺序创建，唯一的打嗝可能是向后的最后一个是第一个B1需要检查。重新设置ssget“F”，您必须提供预先挑选的点。听起来使用2个街区将是最好的方式停车场和一个数字在中心，然后只是重做所有。
CIV3D有一个名为“停车场”的dwg，它的动态刚拖停车场和岛屿就出现了。
当前菜单然后编码
[->CARPARKS]
^C^C(load "how many carparks") carpark
^C^C(load "simple carpark") npark90
^C^C(load "simple carpark") npark30
^C^C^p(load "simple carpark") npark45
^C^C(load "simple carpark") npark60
[<-Carpark 90]^C^C(load "simple carpark") npark90
大家好，
谢谢你的帮助。。。个人和集体。。。。
对我和我的办公室来说，汽车的重新编号一直是一件令人头痛的事。最后，我使用李的属性块和自动标记程序
我为不同级别的汽车分别制作了不同的区块——carGC（有盖底层）、carGO（开放底层）、carB1、carB2、car1FL、car2FL等，并用不同的blockno和blocktag选项更新了他的程序。
它工作得很好。。。。这是一个很大的帮助。。。
谢谢
（一个小问题：有没有办法保持文本水平……并且面朝上……已经尝试将attdef样式作为注释性样式……其水平，但面朝上）
页:
1
[2]