如何找到屏幕上任意像素的颜色

Question

我通常使用VB6编程，但我认为这可能会限制我在活动窗体中的细节。我还有CodeGear 2009和C++、Delphi，这是我从一个朋友那里得到的，但我只有一点Delphi的经验，在C++方面则完全没有经验，但至少我拥有它们，如果需要使用其中的某个程序来实现我想做的事情。我希望能够像这样做：

IF pixelVar(x,y) = 'Red' ( or 'RGBvalue or whatever the correct colour representation)
THEN
    do something
END IF

我想写一个程序来记录扑克牌的统计数据，并希望在我玩扑克的客户端程序时运行该程序，通过像素颜色和位置自动识别卡牌并将它们输入到数据库中。我认为如果我可以轻松地访问像素信息，那么确定牌的数字和花色的模式就不会太难。

任何帮助都将是巨大的帮助。谢谢。

- Paul Zammit

---

除非您已经决定要玩特定的游戏，否则重新编写扑克游戏以自动保留所需的统计信息会更容易一些。我曾经制作过一款二十一点模拟游戏，然后再也没有进过赌场。;-) - Sam

写一个在线扑克机器人啊？ - David Heffernan

我也有从朋友那里得到的带有C++和Delphi的CodeGear 2009，听起来很合理... - Deanna

@Deanna，你想见我的朋友Kim DotCom吗？ - Sam

Answer 1

使用 GetDC() 函数并将其 hWnd 参数设置为 0，以获取屏幕的 HDC 句柄，然后使用 GetPixel() 函数获取所需屏幕坐标处像素的 COLORREF 值，最后使用 GetRValue()、GetGValue() 和 GetBValue() 函数将 COLORREF 拆分为其红色、绿色和蓝色值。

- Remy Lebeau