[求助]创建文字时的基准点问题。

yang6834137 · 发表于 2017-11-1 15:26:10

ThisDrawing.ModelSpace.AddText(文字内容, 插入点, 文字高度)
这里的插入点是文字的左下角，有什么办法改成文字的中心吗？

yang6834137 · 发表于 2017-11-1 15:26:31

挽尊

mikewolf2k · 发表于 2017-11-1 15:35:11

修改对齐方式，根据对齐方式的不同，对齐点可能是插入点或者对齐点之一，具体是哪个，自行测试。

yang6834137 · 发表于 2017-11-1 15:46:46

mikewolf2k 发表于 2017-11-1 15:35
修改对齐方式，根据对齐方式的不同，对齐点可能是插入点或者对齐点之一，具体是哪个，自行测试。

新手不懂怎么用代码修改对起点...求助

mikewolf2k · 发表于 2017-11-2 09:31:58

先去看帮助。

scjhc49703 · 发表于 2017-11-7 23:29:11

Set ObjText = ThisDrawing.ModelSpace.AddText(文字内容, 插入点, 文字高度)
ObjText.Alignment = acAlignmentMiddleCenter
ObjText.TextAlignmentPoint = 文字中心点

希望有用。

账号		自动登录	找回密码
密码			注册