半岛权威十大直营(官方)网站

ProEssentials是一个非常好用的实时曲线绘图控件，它对绘制图表以及图表分析功能所需要的数据和方法进行了简单封装，可以轻松实现专业图表软件的效果。本文讨论ProEssentials坐标注释(Annotations)的使用以及如何创建自定义的坐标刻度。

用Line Annotations创建坐标刻度

禁用掉ProEssentials默认刻度，使用自定义的刻度线和网格线。

自定义Y轴的参数：

自定义X轴的参数：

下面这段代码显示了如何创建一个带有文本标签的Y轴：

'** Disable default scale **'

Pego1.ShowYAxis = PESA_EMPTY


'** Generally, a custom y axis will need manual range control **'

Pego1.ManualScaleControlY = PEMSC_MINMAX

Pego1.ManualMinY = 0

Pego1.ManualMaxY = 1000


'** Create custom grid lines with HorzLineAnnotations **'

'** Note that GridLineControl will control these annotations **'

Pego1.HorzLineAnnotation(0) = 200

Pego1.HorzLineAnnotationType(0) = PELAT_GRIDLINE

Pego1.HorzLineAnnotationText(0) = "|LLow Value"

 
Pego1.HorzLineAnnotation(1) = 500

Pego1.HorzLineAnnotationType(1) = PELAT_GRIDLINE

Pego1.HorzLineAnnotationText(1) = "|LMedium Value"


Pego1.HorzLineAnnotation(2) = 800

Pego1.HorzLineAnnotationType(2) = PELAT_GRIDLINE

Pego1.HorzLineAnnotationText(2) = "|LHigh Value"
 

Pego1.HorzLineAnnotation(3) = 350

Pego1.HorzLineAnnotationType(3) = PELAT_GRIDTICK

Pego1.HorzLineAnnotationText(3) = ""
 

Pego1.HorzLineAnnotation(4) = 650

Pego1.HorzLineAnnotationType(4) = PELAT_GRIDTICK

Pego1.HorzLineAnnotationText(4) = ""


'** Set LeftMargin to allocate space for line annotation text **'

'** Use the longest string used in annotations.

Pego1.LeftMargin = "Medium Value "


'** Set this to see annotations **'

Pego1.ShowAnnotations = True
 

'** Increase line annotation text size **'

Pego1.LineAnnotationTextSize = 100


'** Put Grid In Front **'

Pego1.GridInFront = True

如图所示：

用CustomGridNumber Event自定义坐标刻度

使用CustomGridNumber Event，可以改变坐标上的文本表现形式。当以下属性设置为True时，将会启动相应的事件进程：