易语言如何取某坐标颜色值

.版本 2
.DLL命令 取坐标颜色, 整数型, "gdi32.dll", "GetPixel"
.参数 设备场景, 整数型
.参数 x坐标, 整数型
.参数 y坐标, 整数型
.DLL命令 取设备场景, 整数型, "user32.dll", "GetDC", , 获取指定窗口的设备场景，出错则为0
.参数 窗口的句柄, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC

.版本 2
.子程序 _时钟1_周期事件
.局部变量 颜色值, 整数型
.局部变量 红, 整数型
.局部变量 绿, 整数型
.局部变量 蓝, 整数型
颜色值 ＝ 取坐标颜色 (取设备场景 (0), 取鼠标水平位置 (), 取鼠标垂直位置 ())
编辑框1.内容 ＝ 到文本 (颜色值)
' 红 ＝ 位与 (颜色值, 255)
' 绿 ＝ 右移 (位与 (颜色值, 65280), 8)
' 蓝 ＝ 右移 (位与 (颜色值, 16711680), 16)

标签7.背景颜色 ＝ 颜色值
红 ＝ 取字节集数据 (到字节集 (颜色值), #字节型, 1)
绿 ＝ 取字节集数据 (到字节集 (颜色值), #字节型, 2)
蓝 ＝ 取字节集数据 (到字节集 (颜色值), #字节型, 3)
编辑框3.内容 ＝ 到文本 (红)
编辑框4.内容 ＝ 到文本 (绿)
编辑框5.内容 ＝ 到文本 (蓝)

.子程序 _按钮1_被单击
时钟1.时钟周期 ＝ 到整数 (编辑框2.内容) × 1000
.子程序 _按钮2_被单击
时钟1.时钟周期 ＝ 0

.版本 2.DLL命令 API_GetDC, 整数型, "user32", "GetDC", , 获取指定窗口的设备场景 指定窗口的设备场景句柄，出错则为0
.参数 hwnd, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;.DLL命令 API_GetPixel, 整数型, "gdi32", "GetPixel", , 在指定的设备场景中取得一个像素的RGB值 指定点的RGB颜色。如指定的点位于设备场景的剪切区之外，则返回CLR_INVALID
.参数 hdc, 整数型, , 一个设备场景的句柄
.参数 x, 整数型, , 逻辑坐标中要检查的点;
.参数 y, 整数型, , 同上;
通过这2个函数获取一个整数 然后转换为16进制数 xxaabb R=XX G=AA B=BB!

用别人写好的模块，作坊模块等好多都有这个功能。