codebase="hhctrl.ocx#Version=4,73,8561,0"> codebase="hhctrl.ocx#Version=4,73,8561,0" > codebase="hhctrl.ocx#Version=4,73,8561,0" >
 
  Point 对象

点,作为点、正方形、圆、X形、短线或加号(+),或者这些符号组合起来形成的点标记。

VBA 类名

AcadPoint 

创建方法

ModelSpace.AddPoint
PaperSpace.AddPoint
Block.AddPoint 

访问途径

ModelSpace.Item
PaperSpace.Item
Block.Item
SelectionSet.Item
Group.Item 

可以为一个点指定完整的三维位置。当忽略Z坐标时则假定Z为当前标高。

点对象可以当作节点来捕捉对象。同时,Coordinates 属性提供了可用于需要输入参数的任何方法的数组。

控制点的外观

系统变量 PDMODEPDSIZE 控制着点的外观,PDMODE 值 0、2、3 和 4 指定了通过点所绘制的形状。值为 1 表示不绘制任何图案。

在上述的PDMODE值分别加上32、64或96,这时除了绘制通过指定点的图案之外,还可以在点的周围绘制其他图形形状。

除 PDMODE 的值为 0 或 1 外,PDSIZE 可设置点外形的大小。PDSIZE 值为 0 时,点的大小为绘图区的高度的百分之五,PDSIZE 为正值时,该值为点图案的绝对尺寸;PDSIZE 为负值时,该值为点的尺寸与视区大小的百分比。当图形重生成时会计算所有点的尺寸,并刷新显示。

当用户改变 PDMODE 和 PDSIZE 的值之后,现有点的外观会在下次重新生成图形时改变。

创建和编辑点

要创建一个点,可使用AddPoint方法。要编辑或查询一个点,可使用下列方法和属性:

方法

ArrayPolar

ArrayRectangular

Copy

Delete

GetBoundingBox

GetExtensionDictionary

GetXData

Highlight

IntersectWith

Mirror

Mirror3D

Move

Rotate

Rotate3D

ScaleEntity

SetXData

TransformBy

Update

属性

Application

Coordinates

Document

Handle

HasExtensionDictionary

Hyperlinks

Layer

Linetype

LinetypeScale

Lineweight

Normal

ObjectID

OwnerID

Thickness

TrueColor

Visible

事件

Modified