文本样式高度&（getvar&#
你好我想知道，只要（getvar的textsize）为
与此不同。
(entmakex
(list (cons 0 "TEXT")
(cons 10pt)
(cons 40 (text style height))
(cons 1strings)))
谢谢 请你再问一次这个问题，明确说明你想要什么。 谢谢Kerry，
我想获取包含在文字样式列表中的当前文字高度。
当做
塔瓦特 可能有一张照片就更清楚了。。
当前textheight为（getvar“TEXTSIZE”）
但是
这将取决于最后使用的样式。 你知道，问题是当修改文本样式的高度时，（getvar的textsize）也不会改变。
因此，有时我将文本样式的高度更改为200，（getvar的textsize）保持为0.2，当在Lisp中使用时
那么小。如果我依赖于文本样式，如果它是0.00，它可能会令人失望。
知道吗？
谢谢 在textStyle定义中，查看
DXF 40
固定文字高度；如果不固定，则为0
DXF 42
上次使用的高度 如果我选择一个实体并得到它的文本高度，这是正确的。
如果绘图文本的高度为200，这将令人失望。因为除非有人改变，否则系统变量不会改变。
(entmakex
(list (cons 0 "TEXT")
(cons 10pt)
(cons 40 (getvar 'textsize))
(cons 1strings)))
如果文本高度为0.2，这也会令人失望。
(entmakex
(list (cons 0 "TEXT")
(cons 10pt)
(cons 40 200)
(cons 1strings)))
这就是为什么我想知道在我的日常Lisp中，特别是在绘制不同比例的图形时，我必须保持哪个文本高度！
当做 我个人会用这个。
(setq ots (vla-get-activetextstyle
(vla-get-activedocument (vlax-get-acad-object))
)
CurrentHeight (vla-get-height ots)
LastHeight (vla-get-lastheight ots)
)
但在使用之前，请确保您理解它。
一点尝试和错误，阅读应该可以解决这个问题。 谢谢Kerry，
这必须是一种专业的方式，我应该集中所有的力量来理解它。
我现在得到的一个提示是，代码可以得到图形中最后一个对象的高度
已创建，因此根据该对象高度，运行的Lisp将在当前图形中实现。是这样吗？
除此之外，还可以考虑当前的文字高度。
我认为你指出的错误是，在一个新的图纸中，当还没有实现文本高度时。。。。。。希望这是对的？
再次感谢你，克里，
塔瓦特
页:
[1]
2