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

.版本 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

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

这孩子敢敢的