Pline和LWpline文字位置
我在Map 3D中绘制了一个图形,其中包含与对象数据(属性)相关的实体。通过查询对象数据中的信息,我添加了与每个实体相关联的文本标签。我遇到的问题是这些与多段线和/或LW多段线实体相关联的文本对象的放置。具体来说,当多段线/lw多段线弯曲时。文本不是与多段线上的直线相邻,而是放置在图元的中心,这可能会有很大的偏差。我想创建一个VBA脚本,该脚本将旋转图形中的所有多段线和lw多段线,并修改文字插入点,使其位于多段线中一条线的中点。优选地,选择的直线将是多段线的最长线段或多段线的最中间线段。
修改多段线/lw多段线的插入点后,我计划再次运行查询以重新标记多段线对象。
我没有成功地找到任何接近我想要做的事情。任何帮助都将不胜感激。我对AutoCAD和VBA都是新手。 也许ASMI的优秀工具之一可以帮助您:
http://www.asmitools.com/Files/Lisps/Talon.html
:D 谢谢你,李。不幸的是,我不懂自动列表。不过我会调查的。 查看这里的“沿多段线绘制点”这将一个点沿多段线放置给定距离,将其改为放置文本。(过去几天)
如果您的柱脚相当直,那么当您拾取柱脚时,这可以用于沿柱脚的距离,否则您可以进行中点等。您只需获取柱脚起点与拾取点的距离。 谢谢你,比格尔。不幸的是,我想在VBA中这样做。不太熟悉Lisp。第二,我想在没有任何用户输入的情况下自动放置文本。基本上,我希望旋转图形中的所有多段线(pline或lwpline),并更改其文本插入点。
谢谢你的建议。
页:
[1]