Jag håller på att försöka att lära mig lite granna om spelprogrammering. Form1.FillColor = vbBlueFylla en circle
Vad jag har problem med är att randomize fylla en cirkel med olika färger.
<code>
x = Int(391 * Rnd + 20)
y = Int(231 * Rnd + 20)
BoxX = Picture1.Left
BoxY = Picture1.Top
Form1.ForeColor = RGB(Rnd * 256, Rnd * 256, Rnd * 256)
Form1.FillColor = RGB(Rnd * 256, Rnd * 256, Rnd * 256)
'Form1.Line (BoxX, BoxY)-(BoxX + 100, BoxY + 100), , BF
Form1.Circle (BoxX, BoxY), 45
</code>
Detta är bara ett utdrag ur koden. Vad som händer är att den ritar upp cirklen med olika färger, men jag ville fylla cirklen med samma färg.
Vad tror ni?Sv: Fylla en circle
Form1.FillStyle = 0
Form1.Circle (500, 1000), 500, vbRed
funkar för mig
/bj