潇湘夜雨 发表于 2005-3-17 13:27:00

关于2005中多行文字对齐问题向各位求教！

小弟有个问题想向大家请教：


欲在AutoCAD 2005 中写入一个字串，使其<FONT color=#ff0000>以已知坐标点中心对齐</FONT>，小弟在某过程中写入以下代码：


       Dim objMtext As AcadMText<BR>       Dim dblPoint(0 To 2) As Double<BR>       <BR>       dblPoint(0) = 100: dblPoint(1) = 100<BR>       <BR>       Set objMtext = ThisDrawing.ModelSpace.AddMText(dblPoint, 100, "Welcome to AutoCAD 2005 ! ")<BR>       <BR>       objMtext.Height = 10<BR>       objMtext.AttachmentPoint = acAttachmentPointMiddleCenter


小弟愿意是使字串“Welcome to AutoCAD 2005 ! ”以点（100,100）中心对齐，运行代码后，字串拾取点变成 (150,78.3333)！。不知该问题当如何解决，请大家不吝赐教！


附注：该问题的起源是小弟以前在 R14 下曾经有个小程序运行正常，其中有多处引用外部字串，并将其以某坐标点中心对齐。现在用2005后，运行程序后发现文字位置面目全非！

雪山飞狐_lzh 发表于 2005-3-17 14:22:00

改变对齐方式后，要对MText的对齐点重新赋值

潇湘夜雨 发表于 2005-3-17 14:53:00

谢谢楼上指点！不过能否请你讲得更具体点？比如上面代码要做何修改才能达到预期效果？

潇湘夜雨 发表于 2005-3-17 15:12:00

再次感谢！刚才调试了一下程序，在代码最后加一个语句


objMtext.InsertionPoint = dblPoint


即可通过！
页: [1]
查看完整版本: 关于2005中多行文字对齐问题向各位求教！