用VB如何对绘制的不规则多边形填充

zhihliu

用VB绘制的不规则多边形，如何进行填充?

WEi

你说的应该是用CreatePolygonRgn函数实现吧.MSDN里面有的阿.

VB声明
Declare Function CreatePolygonRgn Lib "gdi32" Alias "CreatePolygonRgn" (lpPoint As POINTAPI, ByVal nCount As Long, ByVal nPolyFillMode As Long) As Long
说明
创建一个由一系列点围成的区域.windows在需要时自动将最后点与第一点相连以封闭多边形
返回值
Long,执行成功为创建的区域句柄,失败则为0
参数表
参数 类型及说明
lpPoint POINTAPI,nCount个POINTAPI结构中的第一个POINTAPI结构
nCount Long,多边形的点数
nPolyFillMode Long,描述多边形填充模式。可为ALTERNATE 或 WINDING常数.参考SetPolyFillMode函数对多边形填充模式的解释
注解
不用时一定要用DeleteObject函数删除该区域

zhihliu

谢谢提供，我试一下

zhihliu

我试了一下，能运行，但看不到结果，什么原因？