在vb.net中创建自定义多边形类

时间:2015-08-15 19:27:26

标签: vb.net oop polygon

我想创建一个自定义polygon shape类,我可以随意拖放到我的表单中(就像OvalShapeRectangleShape个对象一样VS工具箱)。我检查了site1site2site3,其中一个明确表示我的表单的OnPaint事件应该被覆盖。有什么方法可以在创建自定义多边形形状时实现相同的效果,并且仍然会在工具箱上显示我的多边形?

编辑: @Jens:我希望控件能够使用以下测试代码生成代码:

    Me.ClientSize = New Point(24, 24)    
    Dim r1 As Integer = Min(cx, cy) - 10
    Dim r2 As Integer = Min(cx, cy) \ 2
    Dim pts(9) As Point
    For i As Integer = 0 To 9 Step 2
        pts(i).X = cx + CInt(r1 * Cos(i * PI / 5 - PI / 2))
        pts(i).Y = cy + CInt(r1 * Sin(i * PI / 5 - PI / 2))
        pts(i + 1).X = cx + CInt(r2 * Cos((i + 1) * PI / 5 - PI / 2))
        pts(i + 1).Y = cy + CInt(r2 * Sin((i + 1) * PI / 5 - PI / 2))
    Next i

这给了我一颗有5个尖峰的明星。如何将它们存储在创建的Points变量中

OR

将点存储为区域,以便每当我更改forecolor时,它都会用所选颜色填充区域(即多边形)。我也想防止画backcolor。请看下面的链接到我真正想要的c#解决方案,但我很擅长将c#转换为vb。

link1; Link2

非常感谢

0 个答案:

没有答案