• 全部
  • 问答

关于 Win2000Pro下API函数的问题

xpwang 2001-12-13 09:02:22
.
.
.
Type POINTAPI
x As Long
y As Long
End Type
Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
Declare Function CreatePolygonRgn Lib "gdi32" (lpPoint As POINTAPI, ByVal nCount As Long, ByVal nPolyFillMode As Long) As Long
Declare Function PtInRegion Lib "gdi32" (ByVal hRgn As Long, ByVal x As Long, ByVal y As Long) As Long
.
.
.
Dim polyhandle, phandle As Long
Dim npoint As Integer
Dim point() As POINTAPI
.
.
.
polyhandle = CreatePolygonRgn(point(1), npoint, WINDING)'创建一个由一系列点围成的区域。
.
.
.
.
这样的一段程序我在Win98下执行完全正常但我在Win2kPro下却出错,我的意图是由用户选择的点构成一个多边形,然后判断另一些点是否在此区域内。
...全文
67 点赞 收藏 1
写回复
1 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
三杯倒 2001-12-13
1111
回复
发帖
Windows Server
创建于2007-08-02

6600

社区成员

Windows 2016/2012/2008/2003/2000/NT
申请成为版主
帖子事件
创建了帖子
2001-12-13 09:02
社区公告
暂无公告