CAD2008中如何采用编程手段修改字段内容???

maoyangmy

CAD2008中增加了字段功能,
' D  t8 c+ ~% I+ N9 T但如何采用编程手段修改字段内容???

woaishuijia

1、“字段”并非2008的新功能，至少我知道在2005中就有；
" Z1 x9 |; G* |0 a) j. P2、“插入字段”实际上是在调用文档对象及其子对象的属性，所以CAD对象集中并没有“字段”对象，如想“修改字段”应该直接修改相应的对象属性。

sealive_leafage

首先字段是多行文本对象或单行文本对象（AcadMText、AcadTex），参考二对象的FieldCode方法的帮助或许会得到启发！具体没有试过，猜测应该是按fieldcode方法来区分一个文本对象是否为字段；普通文本对象的fieldcode方法是文本对象的内容，而字段则为通配符，至于下面该怎么做你自己考虑吧！
下面是ACAD2008的帮助例子
# Q  O6 T3 J5 ]5 c; o  V7 W, sSub Example_FieldCode()
* B1 c8 a( `( P9 c) @- j    ' This example creates a text object in model space.
    ' It then returns the field code string for the object.

* b$ [9 H' [- B0 Y$ ~( |3 ]' C9 Y0 R    Dim textObj As AcadText
    Dim text As String
$ B: q# l3 W1 _% O    Dim insertionPoint(0 To 2) As Double
    Dim height As Double

    ' Define the text object
    text = "%<\AcVar Date \f ""M/d/yyyy""%>%"
* |, j$ t; w+ \3 A! D3 _8 p    insertionPoint(0) = 2: insertionPoint(1) = 2: insertionPoint(2) = 0
    height = 0.5
2 f% Y  Q! o2 C7 w' I   
2 b8 Q9 E9 J0 f4 Z- A    ' Create the text object in model space
5 p0 n; N6 O. C6 ?. d- y4 h    Set textObj = ThisDrawing.ModelSpace.AddText(text, insertionPoint, height)
& Q' y3 N& a- c& l5 R. D( X    ZoomAll
   
    ' Return the current text string for the object
; a% L$ ~9 Y6 Z1 g' ?* ~    text = textObj.FieldCode
    MsgBox "The FieldCode for the text object equals: " & text, vbInformation, "FieldCode Example"
8 a& ]. E% D8 C$ f# u, p6 O
4 p9 t6 `  P( _3 W/ s  m) P. jEnd Sub
# y* k+ A8 m: e4 B1 m
[ 本帖最后由 sealive_leafage 于 2008-6-18 20:04 编辑 ]

woaishuijia

有一点不同看法：
) ^, Y8 U, E  d4 U1、字段可以插入到任意种类的文字（公差除外）中，其中包括表单元、属性和属性定义中的文字。
6 a# f& g3 ^. ~. e2、FieldCode函数是用来获得文字对象的代码的。在本例程中，单行文字使用了日期字段，查看TextString属性得到的是系统日期字符串，而用FieldCode函数就能得到它的代码"%<\AcVar Date \f ""M/d/yyyy""%>%"。如果一个文字不包含字段，那么TextString和用FieldCode函数得到的代码就是一样的。

woaishuijia

刚才内急，有点词不达意。
' R8 ]* T; Y! D7 }9 t, t我的意思是说，FieldCode是一个函数，它不能用来修改字段本身。当然，可以通过比较TextString属性和FieldCode函数来判断一个文字对象中是否含有字段。不过，换一个其它字段恐怕不是楼主的本意吧？
# ^) F( _7 g/ L1 T& \2 Y9 }( T, y如果修改字段本身，就本例程而言，只要用Date方法修改系统时间，再全部重生成，字段也就改变了。如果是要换一个字段，你的方法可能是最好的了。

maoyangmy

看来确实比较难, 不如直接用属性块算了, 来得方便,谢谢大家