取指定窗口或屏幕某坐标点RGB颜色值

火威网络

刚才看到有人提问。来得及回复，就接完结了，那就分享给以后遇到类似的朋友一些参考吧

  

子程序名	返回值类型	公开	备 注
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 />     .参数 纵坐标, 整数型

飘在空气里

没错了，提问的人就是我。哈哈  感谢大哥分享 谢谢 辛苦

洪兴鸡哥

感谢开源ing