chavlji 发表于 2022-7-6 09:41:23

移动尺寸线-如何?

我想写一个程序,能够移动尺寸(对齐或线性)的暗基线(带长度文本的线)。所以我想保留定义点(附着到对象的点)不变,只移动暗基线。
如果单击“dim baseline”的一个边缘并将其拖动到某个位置,则为“Line”。
 
我试过了,但没用:
(setq
       Ent   (EntGet EName)
       Ent (PutProperty 10 (MovePt (GetProperty 10 Ent) dx dy) Ent))
       (entmod Ent))))
 
MovePt是我的函数,为dx、dy移动点。PutProperty和GetProperty是我基于assoc函数的过程。。。
知道它为什么不起作用吗?

chavlji 发表于 2022-7-6 10:02:56

上部代码适用于非注释性标注。
 
但它是使用注释性样式创建的,不起作用。我应该更改字典中的内容吗?

chavlji 发表于 2022-7-6 10:19:47

我已经读过了,首先我必须得到当前的anno比例。我能做到。
然后我必须(在字典里)搜索用于此比例的实体,并对其进行更改。
谁能告诉我如何找到这个实体?

chavlji 发表于 2022-7-6 10:33:32

任何人
 

pBe 发表于 2022-7-6 10:47:20

 
也许你可以重新措辞你的问题,或者最好贴一张插图
页: [1]
查看完整版本: 移动尺寸线-如何?