Sub DrawArc
x1 = Int(txtx1.Text)
y1 = Int(txty1.Text)
x2 = Int(txtx2.Text)
y2 = Int(txty2.Text)
r = Int(txtr.Text)
If x2 > y2 Then
For l = x2 To y2 Step -1
x = Round(x1 + r * Cos(l * cPI / 180))
y = Round(y1 + r * Sin(l * cPI / 180))
bmp.SetPixel(x,y,Color)
Next
Else
For l = x2 To y2 Step 1
x = Round(x1 + r * Cos(l * cPI / 180))
y = Round(y1 + r * Sin(l * cPI / 180))
bmp.SetPixel(x,y,Color)
Next
End If
form1.DrawImage(bmp.Value,0,0)
form1.Refresh
End Sub
You can using the ImageLib library.colin9876 said:unfortunately due to the fact that you cant plot a single point with the .NET libary I have to draw it with connecting lines
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?