ExtFloodFill problem

[Vili]

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

 

[Armin Zingler]

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..."

This is as VB.Net group. Best place to ask this VB classic question:
microsoft.public.vb.winapi.graphics


Armin

 

[Vili]

This is as VB.Net group. Best place to ask this VB classic question:
microsoft.public.vb.winapi.graphics


Armin

Sorry for wrong group posting