FillEllipse

FillEllipse用于填充一个椭圆,其的语法为:

FillEllipse(color, rect)
FillEllipse(color, x, y, width, height)
FillEllipse(
brush, rect)
FillEllipse(
brush, x, y, width, height)

参数 说明
color 用于填充的颜色
brush 用于填充的画刷,Brush类型。

过Brushes可以返回各种颜色的默认画刷,例如:

Dim br As Brush = Brushes.Red '获得红色的画刷

可以用自定义的颜色来定义画刷,例如:

Dim br1 As Brush = New SolidBrush(Color.FromARGB(255,255,192,203))
Dim
br2 As Brush = New SolidBrush(Color.FromARGB(-16181))

rect RectangleF类型,用于指定椭圆的位置和大小
x, y, width, height 分别用于直接指定椭圆的水平位置、垂直位置、宽度和高度

示例

Dim file As String = "c:\temp\test.pdf"
Dim
pdc As New PDFCreator()
Dim
rect As New RectangleF(72, 72, 100, 50)
pdc.FillEllipse(Color.Red, rect)
pdc.FillEllipse(Color.Green, 202, 72, 100, 50)
pdc.Save(file)

pdc.Show()

绘制的椭圆:

 

 


本页地址:http://www.foxtable.com/webhelp/topics/6110.htm