易语言怎么判断一个四边形的区域内

丛子航

{[1] = {x = 186,y = 70}, [2] = {x = 212, y = 86}, [3] = {x = 185,y = 100}, [4] = {x = 159,y = 86}}已知四个点的坐标，怎么用易语言判断在这个四边形的区域呢？，最好是有个例子，谢谢大神们

雨落无声

判断点是否在区域内.e (5.57 KB, 下载次数: 6)

2021-8-7 20:08 上传

点击文件名下载附件 三句代码解决！利用你提供的点组合成point数组，然后创建一个多边形的区域句柄，然后调用api判断点是否在这个区域内，返回结果，释放句柄！

  

子程序名	返回值类型	公开	备 注
判断是否在多边形内	逻辑型
参数名	类 型	参考	可空	数组	备 注
坐标组	POINT
点	POINT

变量名	类 型	静态	数组	备 注
hRgn	整数型
ret	逻辑型

hRgn ＝ CreatePolygonRgn (坐标组, 取数组成员数 (坐标组), #WINDING )  ' 创建一个多边形区域
如果 (PtInRegion (hRgn, 点.x, 点.y) ≠ 0)  ' 判断某个点是否在这个区域内
ret ＝ 真
ret ＝ 假
DeleteObject (hRgn)  ' 删除区域句柄
返回 (ret)

.版本 2<br /> <br /> .子程序 判断是否在多边形内, 逻辑型<br /> .参数 坐标组, POINT, 数组<br /> .参数 点, POINT<br /> .局部变量 hRgn, 整数型<br /> .局部变量 ret, 逻辑型<br /> <br /> hRgn ＝ CreatePolygonRgn (坐标组, 取数组成员数 (坐标组), #WINDING)  ' 创建一个多边形区域<br /> .如果 (PtInRegion (hRgn, 点.x, 点.y) ≠ 0)  ' 判断某个点是否在这个区域内<br />     ret ＝ 真<br /> .否则<br />     ret ＝ 假<br /> .如果结束<br /> DeleteObject (hRgn)  ' 删除区域句柄<br /> 返回 (ret)

鹏书

已经知道4个点了区域怎么还会不知道呢

初学者1

判断小于坐标点不就是在这里了？