怎么判断屏幕颜色被改变？

4834

一个窗口，窗口有一个编辑框，然后窗口是最小化的。编辑框的内容是每秒加1的，但是屏幕颜色被改动后这个编辑框的数字会变成零，或者说怎么判断用户有没有在播放视频？

eyyhs

  

子程序名	返回值类型	公开	备 注
Debug

变量名	类 型	静态	数组	备 注
y	整数型
x	整数型
R	字节型
G	字节型
B	字节型

置随机数种子 ()
x ＝ 取随机数 (1, 1920)
y ＝ 取随机数 (1, 1080)
取坐标点RGB (0, x, y, R, G, B)

子程序名	返回值类型	公开	备 注
取坐标点RGB
参数名	类 型	参考	可空	数组	备 注
hWnd	整数型				0取屏幕上任意一点；指定窗口句柄则按照窗口句柄上坐标取
x	整数型
y	整数型
r	字节型
g	字节型
b	字节型

变量名	类 型	静态	数组	备 注
color	整数型
bin	字节集
hdc	整数型

hdc ＝ GetDC (hWnd)  ' //获取设备场景
color ＝ GetPixel (hdc, x, y)
输出调试文本 (“//------------------->>>  十进制颜色值->RGB 方式1”)
bin ＝ 到字节集 (color)
r ＝ bin [1]
g ＝ bin [2]
b ＝ bin [3]
输出调试文本 (r, g, b)
输出调试文本 (“//------------------->>>  十进制颜色值->RGB 方式2”)
r ＝ 位异或 (color, 左移 (右移 (color, 8), 8))
g ＝ 位异或 (右移 (color, 8), 左移 (b, 8))
b ＝ 右移 (color, 16)
输出调试文本 (r, g, b)
DeleteDC (hdc)  ' //删除设备场景

.版本 2<br /> <br /> .子程序 Debug<br /> .局部变量 y, 整数型<br /> .局部变量 x, 整数型<br /> .局部变量 R, 字节型<br /> .局部变量 G, 字节型<br /> .局部变量 B, 字节型<br /> <br /> 置随机数种子 ()<br /> x ＝ 取随机数 (1, 1920)<br /> y ＝ 取随机数 (1, 1080)<br /> 取坐标点RGB (0, x, y, R, G, B)<br /> <br /> .子程序 取坐标点RGB<br /> .参数 hWnd, 整数型, 可空, 0取屏幕上任意一点；指定窗口句柄则按照窗口句柄上坐标取<br /> .参数 x, 整数型, 可空<br /> .参数 y, 整数型, 可空<br /> .参数 r, 字节型, 参考<br /> .参数 g, 字节型, 参考<br /> .参数 b, 字节型, 参考<br /> .局部变量 color, 整数型<br /> .局部变量 bin, 字节集<br /> .局部变量 hdc, 整数型<br /> <br /> hdc ＝ GetDC (hWnd)  ' //获取设备场景<br /> color ＝ GetPixel (hdc, x, y)<br /> 输出调试文本 (“//------------------->>>  十进制颜色值->RGB 方式1”)<br /> bin ＝ 到字节集 (color)<br /> r ＝ bin [1]<br /> g ＝ bin [2]<br /> b ＝ bin [3]<br /> 输出调试文本 (r, g, b)<br /> <br /> 输出调试文本 (“//------------------->>>  十进制颜色值->RGB 方式2”)<br /> r ＝ 位异或 (color, 左移 (右移 (color, 8), 8))<br /> g ＝ 位异或 (右移 (color, 8), 左移 (b, 8))<br /> b ＝ 右移 (color, 16)<br /> 输出调试文本 (r, g, b)<br /> DeleteDC (hdc)  ' //删除设备场景

用到的DLL命令

  

DLL命令名	返回值类型	公开	备 注
GetDC	整数型		获取指定窗口的设备场景  指定窗口的设备场景句柄，出错则为0
DLL库文件名:
user32
在DLL库中对应命令名:
GetDC
参数名	类 型	传址	数组	备 注
hwnd	整数型			将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;

.版本 2<br /> <br /> .DLL命令 GetDC, 整数型, "user32", "GetDC", 公开, 获取指定窗口的设备场景  指定窗口的设备场景句柄，出错则为0<br />     .参数 hwnd, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;

  

DLL命令名	返回值类型	公开	备 注
DeleteDC	整数型
DLL库文件名:
gdi32.dll
在DLL库中对应命令名:
DeleteDC
参数名	类 型	传址	数组	备 注
设备场景句柄	整数型			hdc，将要删除的设备场景

.版本 2<br /> <br /> .DLL命令 DeleteDC, 整数型, "gdi32.dll", "DeleteDC", 公开<br />     .参数 设备场景句柄, 整数型, , hdc，将要删除的设备场景

  

DLL命令名	返回值类型	公开	备 注
GetPixel	整数型		鼠标取坐标颜色
DLL库文件名:
gdi32.dll
在DLL库中对应命令名:
GetPixel
参数名	类 型	传址	数组	备 注
设备句柄	整数型
横坐标	整数型
纵坐标	整数型

.版本 2<br /> <br /> .DLL命令 GetPixel, 整数型, "gdi32.dll", "GetPixel", 公开, 鼠标取坐标颜色<br />     .参数 设备句柄, 整数型<br />     .参数 横坐标, 整数型<br />     .参数 纵坐标, 整数型

知道怎么玩了把！！！！

4834

eyyhs 发表于 2022-10-30 12:29
[e=0].版本 2

.子程序 Debug

好人做到底，弄成e再发出来可以吗？我太新了

陽陽陽

很简单，截图，
如果上一次截图数据 <>这一个截图数据
清空

编辑框内容加一的话可以设置
窗口——禁止截图（不知道能不能单独禁止编辑框截图）

补充内容 (2022-10-31 11:44):
精益模块的命令

afu45

窗口_取标题 ()

4834

afu45 发表于 2022-10-31 11:45
窗口_取标题 ()

我是小白，完全没看懂

4834

陽陽陽 发表于 2022-10-31 11:43
很简单，截图，
如果上一次截图数据 这一个截图数据
清空

模块用啦，没找到这个命令啊？能不能发个e程序给我？

陽陽陽

4834 发表于 2022-10-31 20:13
模块用啦，没找到这个命令啊？能不能发个e程序给我？

截图命令：快照（）

或者去年开源大赛（还是前年来着）那个高仿大漠，有个截图，设置不带鼠标，然后截图

精益模块命令：窗口_禁止截图（编辑框1.取窗口句柄（））
或者：窗口_禁止截图（窗口1.取窗口句柄（））

我这台电脑没法装易语言，抱歉

4834

陽陽陽 发表于 2022-10-31 22:45
截图命令：快照（）

或者去年开源大赛（还是前年来着）那个高仿大漠，有个截图，设置不带鼠标，然后截图 ...

不行，

陽陽陽

4834 发表于 2022-10-31 23:12
不行，

为什么，具体哪个命令，大佬