jiangwen1980 发表于 2003-6-4 11:02:00

怎样使文本居中排列？

我是VB新手，在用VB开发AutoCAD时创建的文本无法居中排列。请高手指教。

zfbj 发表于 2003-6-5 14:49:00

能描述得详细一点吗？

jiangwen1980 发表于 2003-6-7 13:33:00

怎样使文本居中排列？之二

比如有下面程序：
Dim TextObj As acadText
dim String as String
Dim Height As Double
Dim InPoint(0 To 2) As Double
String="文本居中对起"
Height = 5
InPoint(0) = 10: InPoint(1) = 10: InPoint(2) = 0
Set TextObj = AcadDoc.ModleSpace.AddText(String,InPoint,Height)
TextObj.Alignment = acAlignmentMiddleCenter
当然，我省略了AutoCAD接口程序。在运行时，我发现文本的对起点竟然在原点？！

mccad 发表于 2003-6-7 17:27:00

这个问题以前已经解决过，请看链接

http://www.mjtd.com/bbs/dispbbs.asp?boardID=4&RootID=24167&ID=24172

jiangwen1980 发表于 2003-6-14 09:44:00

高手！非常感谢！

ntyks 发表于 2009-7-28 14:49:00

页: [1]
查看完整版本: 怎样使文本居中排列？