Farbpixel beim Mauszeiger feststellen?

[SirThornberry]

genau die zweite Zeile ist der übeltäter. Wenn mit GetDC ein Handle geholt wird muss dieses auch wieder frei gegeben werden was aber nicht möglich ist wenn man das ganze nicht zwischenspeichert sondern direkt an die Funktion GetPixel übergibt.

Delphi-Quellcode:

var
  lDC: HDC;
begin
  lDC := GetDC(0);
  if (lDC > 0) then
  begin
    xyz := GetPixel(lDC, x, y);
    [...]
    ReleaseDC(0, lDC);
  end;