Hej

Om man ska fylla ett område ( det som omsluts av en cirkelbåge och linje), får jag inte till , ett litet expempel:

Private Sub Form_Load()

Me.AutoRedraw = True
Me.DrawWidth = 2
Me.FillColor = vbRed
'Me.FillStyle = 0 ?


Me.Circle (150, 125), 100, vbRed, 0, 2.3562

Me.Line (250, 125)-(79.28932188, 54.28932188), vbRed

End Sub

//E

Se [Gör en circel som är uppdelad i olika delar....]

Det jag var ute efter var bara att om man kunde "fylla" ett område tex. en cirkelbåge och ett sträck eller något annat område som består av olika delar, men jag antar att det inte går eftersom de inte "hänger" ihop.
(Det var ett dåligt exempel jag hade gjort.)

//E

Kika på ExtFloodFill API anropet:
<code>
Private Declare Function ExtFloodFill Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long, ByVal wFillType As Long) As Long
</code>

Ok, ska försöka.

//E

Tack Andreas, det funkar med ExtFloodFill.

//E