精易论坛

标题: XY TABLE取指定XY坐标的颜色值类似Haconl 色彩识别 [打印本页]

作者: q1012789582 时间: 2016-12-23 12:26
标题: XY TABLE取指定XY坐标的颜色值类似Haconl 色彩识别
本帖最后由 q1012789582 于 2016-12-24 08:28 编辑

XY TABLE取指定XY坐标的颜色值类似Haconl 色彩识别，修改XY坐标，取相对应的颜色值，废话不多说，上源代码！

不知道为什么，不能上传附件，下面是百度网盘地址;

百度网盘下载源代码链接: http://pan.baidu.com/s/1pKZFat1 密码: bnab

优化代码，去掉DLL调用，纯易语言画板操作

.版本 2

.子程序 _按钮1_被单击
.局部变量 RGB, 字节集
.局部变量颜色值, 整数型

颜色值＝画板1.取点 (到数值 (X.内容), 到数值 (Y.内容))
RGB ＝到字节集 (颜色值)
R.内容＝到文本 (RGB [1])
G.内容＝到文本 (RGB [2])
B.内容＝到文本 (RGB [3])
编辑框1.内容＝到文本 (颜色值)
标签1.背景颜色＝颜色值

核心代码如下:

.版本 2

.子程序矩形左上角, 整数型, 公开
.局部变量颜色值, 整数型
.局部变量红, 整数型
.局部变量绿, 整数型
.局部变量蓝, 整数型

颜色值＝取坐标颜色 (取设备场景 (画板1.取窗口句柄 ()), 55, 60) ' 修改XY坐标，取相对应的颜色值
编辑框1.内容＝到文本 (颜色值)
标签7.背景颜色＝颜色值
红＝取字节集数据 (到字节集 (颜色值), #字节型, 1)
绿＝取字节集数据 (到字节集 (颜色值), #字节型, 2)
蓝＝取字节集数据 (到字节集 (颜色值), #字节型, 3)
R.内容＝到文本 (红)
G.内容＝到文本 (绿)
B.内容＝到文本 (蓝)
返回 (颜色值)

DLL如下:

.版本 2

.DLL命令取坐标颜色, 整数型, "gdi32.dll", "GetPixel"
.参数设备场景, 整数型
.参数 x坐标, 整数型
.参数 y坐标, 整数型

.DLL命令取设备场景, 整数型, "user32.dll", "GetDC", , 获取指定窗口的设备场景，出错则为0
.参数窗口的句柄, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC

NewImag1e.jpg (120.29 KB, 下载次数: 1)

作者: fengyishen 时间: 2016-12-23 13:07

这个也参赛，胜算不大呀！

作者: q1012789582 时间: 2016-12-23 23:05
说明下，这个已经应用于简单的工业测试，可以获取摄像头拍到的图片XY某个坐标点事什么颜色，抛砖引玉，如需定制软件联系QQ1012789582

作者: 万物皆有定数 时间: 2016-12-24 20:53
这个也参赛，胜算不大呀！

作者: 366728425 时间: 2016-12-27 10:10

q1012789582 发表于 2016-12-23 23:05
说明下，这个已经应用于简单的工业测试，可以获取摄像头拍到的图片XY某个坐标点事什么颜色，抛砖引玉，如需 ...

是不是当前窗口取色、能不能当识图使用？

作者: whh365 时间: 2018-3-27 18:40
下载测试下，再来评价

欢迎光临精易论坛 (https://125.confly.eu.org/)