图形判断－－求助

CreatePolygonRgn 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常数。ALTERNATE 交替填充 
WINDING 根据绘图方向填充 
注解 
不用时一定要用DeleteObject函数删除该区域
 
PtInRegion VB声明 
Declare Function PtInRegion Lib "gdi32" Alias "PtInRegion" (ByVal hRgn As Long, ByVal x As Long, ByVal y As Long) As Long 
说明 
确定点是否在指定区域内 
返回值 
Long，若点在区域内为非零值，否则为0 
参数表 
参数 类型及说明 
hRgn Long，区域句柄 
x Long，以逻辑坐标表示的点的X坐标 
y Long，以逻辑坐标表示的点的Y坐标 
在vb里使用 
在测试复杂图象时非常有用