TcDXFName -

'3DFACE                             三维面                     AcDbFace
        '3DSOLID                            三维实体                   AcDbModelerGeometry
        'ACAD_PROXY_ENTITY                  代理--------------------AcDbProxyEntity
        'ARC--------------------------------圆弧--------------------AcDbCircle
        'ATTDEF-----------------------------属性定义---------------AcDbAttributeDefinition
        'ATTRIB-----------------------------属性--------------------AcDbAttribute
        'BODY-------------------------------体-----------------------AcDbModelerGeometry
        'CIRCLE-----------------------------圆-----------------------AcDbCircle
        'DIMENSION--------------------------标注---------------------AcDbDimension、AcDbAlignedDimension、AcDbRotatedDimension
        'ELLIPSE----------------------------椭圆---------------------AcDbEllipse
        'HATCH------------------------------图案填充----------------AcDbHatch
        'IMAGE------------------------------图像---------------------AcDbRasterImage
        'INSERT-----------------------------插入（块参照）-------AcDbBlockReference
        'LEADER-----------------------------引线---------------------AcDbLeader
        'LINE-------------------------------直线---------------------AcDbLine
        'LWPOLYLINE-------------------------优化多段线-------------AcDbPolyline
        'MLINE------------------------------多线----------------------AcDbMline
        'MTEXT------------------------------多行文字-----------------AcDbMText
        'OLEFRAME
        'OLE2FRAME
        'POINT------------------------------点--------------------------AcDbPoint
        'POLYLINE---------------------------多段线--------------------AcDb2dPolylineAcDb2dPolyline
        'RAY--------------------------------射线-----------------------AcDbRay
        'REGION-----------------------------面域-----------------------AcDbModelerGeometry
        'SEQEND
        'SHAPE------------------------------形--------------------------AcDbShape
        'SOLID------------------------------实体------------------------AcDbTrace
        'SPLINE-----------------------------样条曲线------------------AcDbSpline
        'TABLE------------------------------表--------------------------AcDbTable
        'TEXT-------------------------------文字------------------------AcDbText
        'TOLERANCE--------------------------公差------------------------AcDbFcf
        'TRACE------------------------------跟踪------------------------AcDbTrace
        'VERTEX-----------------------------顶点-------------------------AcDbVertex
        'VIEWPORT---------------------------视口-------------------------AcDbViewport
        'WIPEOUT----------------------------遮罩-------------------------AcDbRasterImage
        'XLINE------------------------------构造线----------------------AcDbXline
        Public Structure TcDXFName
            Const Polyline As String = "LWPOLYLINE"
            Const BlockReference As String = "INSERT"
            Const DBtext As String = "TEXT"
            Const Text As String = "TEXT"
            Const AttributeDefinition As String = "ATTDEF"
            Const Arc As String = "ARC"
            Const Circle As String = "CIRCLE"
            Const Line As String = "LINE"
            Const Hatch As String = "HATCH"
            Const MText As String = "MTEXT"
            Const Proxy As String = "ACAD_PROXY_ENTITY"
            Const TCH_Block As String = "TCH_BLOCK_INSERT"
            Const Dimension As String = "DIMENSION"
            Const SOLID As String = "SOLID"
            Const AttributeReference As String = "ATTRIB"
            Const Region As String = "REGION"
            Public Event EventTest(ByVal test As Long) 'VS2008 需要
        End Structure
        Public Structure TcGetTypeName
            Const Polyline As String = "Polyline"
            Const BlockReference As String = "BlockReference"
            Const DBtext As String = "DBtext"
            Const Text As String = "TEXT"
            Const AttributeDefinition As String = "AttributeDefinition"
            Const Arc As String = "Arc"
            Const Circle As String = "Circle"
            Const Line As String = "Line"
            Const Hatch As String = "Hatch"
            Const MText As String = "MText"
            Const Proxy As String = "ACAD_PROXY_ENTITY"
            Const TCH_Block As String = "TCH_BLOCK_INSERT"
            Const Dimension As String = "Dimension"
            Const SOLID As String = "SOLID"
            Const Region As String = "REGION"
            Public Event EventTest(ByVal test As Long) 'VS2008 需要
        End Structure

分享到： QQ空间新浪微博腾讯微博微信更多

暂时没有评论

发表评论 - 不要忘了输入验证码哦！

作者：

用户：密码：注册？验证：