Farbpixel beim Mauszeiger feststellen?

[sakura]

@SirThornberry: wenn schon Release, dann aber bitte mit try..finally..end

Delphi-Quellcode:

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

......