易語言擷取目前滑鼠的視窗句柄、位置、顔色值

.版本 2
.支援庫 eAPI

.子程式 _時鐘1_周期事件
.局部變量 R, 整數型
.局部變量 G, 整數型
.局部變量 B, 整數型

編輯框z句柄.内容 ＝ 到文本 (取滑鼠所在視窗句柄 ())
編輯框z滑鼠X.内容 ＝ 到文本 (取滑鼠水準位置 ())
編輯框z滑鼠Y.内容 ＝ 到文本 (取滑鼠垂直位置 ())
取目前滑鼠處顔色值 (R, G, B)
編輯框zR.内容 ＝ 到文本 (R)
編輯框zG.内容 ＝ 到文本 (G)
編輯框zB.内容 ＝ 到文本 (B)
編輯框z顔色值.内容 ＝ 到文本 (R ＋ 256 × G ＋ 65536 × B)
畫闆1.畫闆背景色 ＝ R ＋ 256 × G ＋ 65536 × B