调整多行文字框的大小
希望在不更改文本大小的情况下设置多行文字框的大小(在属性中定义的宽度和高度)。宽度4.370
高度1.125
找到这个。。。
(defun c:zw ()
(vlax-put (vlax-ename->vla-object (car (entsel "\nPick Mtext Object: "))) 'width 4.370)
(princ)
)
它可以工作,但如果我将宽度更改为高度,它会更改文本大小,而不是框大小。
谢谢
--
克里斯 据我所知,对于AutoLISP或Visual LISP API,多行文字窗口的高度是只读的;DXF组43是只读的,据我所知,没有与多行文字窗口高度相关的ActiveX属性。 前一段时间,我在胡闹这里张贴的惯例:http://forums.autodesk.com/t5/Visual-LISP-AutoLISP-and-General/MText-Set-Limits-Box-to-minimum/td-p/1527932/highlight/false/page/2
并调整了读取(setq dxf42(*(CDR(ASSOC 42 EntData))1.015))的行中当前为“1.015”的值
它可以工作,但不能使包装函数达到我指定的确切宽度。也许再进行一些修补就能使它工作了。。。
~格雷格 谢谢李。。。
也许这不是你想要的答案,但不客气,克里斯。
页:
[1]