auslesen der farbe eines pixels auf dem monitor

[3_of_8]

Einfach ein Canvas an den Desktop binden.

Delphi-Quellcode:

function GetColorAt(const X, Y: Integer): TColor;
var canvas: TCanvas;
begin
  canvas:=TCanvas.Create;
  try
    canvas.Handle:=GetWindowDC(GetDesktopWindow);
    Result:=canvas.pixels[X, Y];
  finally
    canvas.Free;
  end;
end;

(ungetestet)