Hi all
I have a circle with lines drawn from the center to edge of circlef
orming a wedge. I am trying to fill that wedge with a color, but there
is some problems with this. I have declared the ExtFloodFill Lib "Gdi32..."
r = radius
a = starting point and l = ending point
Fillcolor for picture1 is solid
'draw the circle
Picture1.Circle (middleX, MiddleY), r, vbBlue
'draw lines
picture1.line(middleX, middleY)-(middleX - r * Cos(-1 * a),(middleY + r
* Sin(-1 * a)), vbGreen
picture1.line(middleX, middleY)-(middleX - r * Cos(-1 * l),(middleY + r
* Sin(-1 * l)), vbGreen
'Now there is a circle with 2 lines from the center forming a sort of
'pie chart
'Then comes the filling. The point where the filling should start is
'near the center of the circle inside the wedge
ExtFloodFill Picture1.hdc, (middleX - Cos((a + l) / 2) * 20), (MiddleY -
Sin((a + l) / 2) * 20), vbGreen, 1