Jak pobrać kolor dowolnego punktu na ekranie?

Jak umieścić w zmiennej TColor kolor dowolnego pixela na monitorze?

Jak umieścić w zmiennej TColor kolor dowolnego pixela na monitorze?

tu masz nawet bonus :-D co pobiera kolor punktu
na ekranie, który wskazuje myszka

var
Punkt: TPoint;
Kolor: TColor;
begin
GetCursorPos(Punkt);
Canvas.Handle := GetWindowDC(GetDesktopWindow);
Kolor := Canvas.Pixels[Punkt.X, Punkt.Y];
end;

--
Pozdrawiam...
piechnat