Home All Groups Group Topic Archive Search About
Author
12 Jan 2006 3:31 PM
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

Author
12 Jan 2006 4:04 PM
Armin Zingler
"Vili" <tu***@eitoimi.fi.invalid> schrieb
> 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
Author
12 Jan 2006 4:48 PM
Vili
Armin Zingler wrote:
Show quoteHide quote
> "Vili" <tu***@eitoimi.fi.invalid> schrieb
>
>> 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

Sorry for wrong group posting