此源码为:监控屏幕上某一指定像素点的颜色变化,指定像素点,颜色如果发生变化,不和给定的颜色一样时,信息框提醒,且播放音乐!可指定变化后持续时间再报警提醒,源码分享!希望能帮到有需要的朋友们!
API使用了两个,GetDc (取设备场景) 和GetPixel (取点颜色值),如有不清楚的,可以私信我,共同学习共同进步!本人为易语言入门菜鸟,有写的不对的地方,多多指教!
软件界面

颜色值变化后提醒并播放音乐

要用的API

源码
.版本 2
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.程序集变量 变量1, 文本型
.程序集变量 变量2, 整数型
.程序集变量 R, 整数型
.程序集变量 G, 整数型
.程序集变量 B, 整数型
.程序集变量 指定的颜色, 整数型
.程序集变量 变量4, 整数型
.子程序 _按钮1_被单击
' _启动窗口.总在最前 = 真 ’(这一句可以不要)
时钟1.时钟周期 = 10
指定的颜色 = API_取点 (API_取设备场景 (0), 1786, 98) '(此处的1786和98为屏幕坐标,可以更改)
.子程序 _时钟1_周期事件
取当前鼠标处颜色值 (R, G, B)
变量2 = R + 256 × G + 65536 × B
变量1 = “水平位置:” + 到文本 (取鼠标水平位置 ()) + “垂直位置:” + 到文本 (取鼠标垂直位置 ())
编辑框1.内容 = 变量1
编辑框2.内容 = 到文本 (变量2)
编辑框2.背景颜色 = 变量2
.如果真 (指定的颜色 ≠ API_取点 (API_取设备场景 (0), 1786, 98))
延时 (5000)
.如果真 (指定的颜色 ≠ API_取点 (API_取设备场景 (0), 1786, 98))
时钟1.时钟周期 = 0
播放MID (1, , #声音1)
变量4 = 信息框 (“颜色变化了大哥”, 0, , )
.如果真 (变量4 = 0)
停止播放 ()
.如果真结束
菜鸟一枚,有写的不好的地方,多多指教!
API使用了两个,GetDc (取设备场景) 和GetPixel (取点颜色值),如有不清楚的,可以私信我,共同学习共同进步!本人为易语言入门菜鸟,有写的不对的地方,多多指教!
软件界面

颜色值变化后提醒并播放音乐

要用的API

源码
.版本 2
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.程序集变量 变量1, 文本型
.程序集变量 变量2, 整数型
.程序集变量 R, 整数型
.程序集变量 G, 整数型
.程序集变量 B, 整数型
.程序集变量 指定的颜色, 整数型
.程序集变量 变量4, 整数型
.子程序 _按钮1_被单击
' _启动窗口.总在最前 = 真 ’(这一句可以不要)
时钟1.时钟周期 = 10
指定的颜色 = API_取点 (API_取设备场景 (0), 1786, 98) '(此处的1786和98为屏幕坐标,可以更改)
.子程序 _时钟1_周期事件
取当前鼠标处颜色值 (R, G, B)
变量2 = R + 256 × G + 65536 × B
变量1 = “水平位置:” + 到文本 (取鼠标水平位置 ()) + “垂直位置:” + 到文本 (取鼠标垂直位置 ())
编辑框1.内容 = 变量1
编辑框2.内容 = 到文本 (变量2)
编辑框2.背景颜色 = 变量2
.如果真 (指定的颜色 ≠ API_取点 (API_取设备场景 (0), 1786, 98))
延时 (5000)
.如果真 (指定的颜色 ≠ API_取点 (API_取设备场景 (0), 1786, 98))
时钟1.时钟周期 = 0
播放MID (1, , #声音1)
变量4 = 信息框 (“颜色变化了大哥”, 0, , )
.如果真 (变量4 = 0)
停止播放 ()
.如果真结束
菜鸟一枚,有写的不好的地方,多多指教!