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)) |
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()
绘制的椭圆: